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PREFAZIONE 


Questo non è un altro libro sul linguaggio macchina di un popolare microcom- 
puter che consuma metà delle sue pagine spiegando tutte le istruzioni macchina del 
6502/6510 ed i loro svariati modi di indirizzamento, con un bieco programma cari- 
catore ed una serie di routine in linguaggio macchina presentate al termine e di 
dubbio interesse. L’intenzione di questo libro è quella di fornire ai lettori un solido 
programma in BASIC per immettere nel computer routine in linguaggio macchina 
ed in assembler e, contemporaneamente, offrire una serie di programmi in linguag- 
gio macchina che vale la pena possedere. 

Il programma BASIC si chiama Mastercode ed è uno strumento praticamente 
completo per la programmazione in linguaggio macchina, contenente un Monitor 
per permettervi di esaminare e cambiare il contenuto della memoria, un Disassem- 
blatore che traduce i programmi in linguaggio macchina nella forma di un assem- 
bler, ed infine un File Editor ed un Assembler che permettono lo sviluppo di pro- 
grammi in assembler e la loro trasformazione in codice macchina. 

Per quanto riguarda le routine in linguaggio macchina della seconda metà del li- 
bro, abbiamo adottato un nuovo approccio. Troverete una raccolta di routine che 
potrete usare per ampliare il BASIC del vostro 64 con 14 nuovi comandi. Oltre ad 
accrescere la potenza del BASIC, vi aiuterà ad imparare le tecniche della vera pro- 
grammazione in linguaggio macchina ed il modo in cui il programmatore in lin- 
guaggio macchina può sfruttare le routine presenti nell’interprete BASIC del 64. 

Il libro non vuole essere un introduzione al linguaggio macchina. Ciò non signi- 
fica che non possa essere usato da principianti. Semplicemente abbiamo dato per 
scontato che voi possediate, o possiate accedere, a qualche altro testo che spieghi 
in dettaglio ogni istruzione del 6502/6510. Riteniamo che, concentrandoci sui pro- 
grammi e spiegando le tecniche usate in essi, abbiamo potuto offrire un lavoro di 
maggior valore. Se vi capiterà di controllare qualche strana istruzione sul vostro li- 
bro-base del 6502, quello sarà il piccolo prezzo che dovrete pagare. 

Tutti i programmi del libro sono stati controllati, Mastercode in particolare è 
stato provato fino all’esaurimento (nostro). Le routines in linguaggio macchina so- 
no state tutte sviluppate su Mastercode, poichè questo era l’unico modo per essere 
sicuri che voi sareste riusciti a fare lo stesso. Se vi imbatterete in errori di qualsiasi 


V 


tipo la colpa sarà nostra, ma osiamo dire che non dovrebbero essere gravi, vista 
l’attenzione usate nel testing dei programmi. 

Il libro è un lavoro svolto in cooperazione fra due persone di provenienza assai 
differente. David Lawrence scrive principalmente programmi BASIC ed è autore di 
parecchi libri sui microcomputer. Il suo interesse per l'hardware è minimo. Mark 
England studia Ingegneria Elettronica, si trastulla con i chips di silicio come se fos- 
sero la sua vera natura ed ha imparato a scrivere in linguaggio macchina quando si 
è bruciata la ROM contenente il BASIC del suo micro. Ha scoperto che non ne a- 
veva più bisogno. 

L’idea venne a David Lawrence, stufo di comperare libri sul linguaggio macchi- 
na che non gli fornivano nulla di veramente interessante quando vi lavorava sopra 
seriamente. Mark England è autore della maggior parte della programmazione, 
sebbene non senza imbarazzo. La forma finale del libro deriva della necessità di 
Mark England di spiegare al suo co-autore di cosa si occupassero i suoi programmi 
e di farli tradurre per i comuni mortali. In questo processo di spiegazione e discus- 
sione si è sviluppato uno stile che, crediamo, renda giustizia sia ai programmi sia 
alla necessità dei lettori di comprenderli. 

Altro partner nella stesura del libro è stato il Commodore 64. Questo testo non 
sarebbe stato possibile per molti altri micro. È solo grazie alla filosofia Commodo- 
re di aprire la macchina al programmatore, lasciando libero accesso ad una molti- 
tudine di routines dell’interprete che altri si sforzano di mettere sotto chiave, che 
siamo riusciti a scomporre e ricomporre il BASIC del 64. Abbiamo avuto discus- 
sioni con il 64, ma esso resta una macchina inestimabile per chi voglia andare oltre 
il BASIC. 

Infine, dobbiamo ringraziare il personale dei negozi Microchip di Winchester e 
Southampton, che ci ha fornito aiuto insostituibile al momento di sostituire attrez- 
zature e rifornimenti. Dobbiamo ringraziamenti anche a Jane Lawrence, che rego- 
larmente, andando a letto mentre noi picchiavamo sulla tastiera a notte inoltrata, ci 
diceva quale meraviglioso lavoro stessimo facendo. 

Speriamo che avesse ragione. 


VI 


Parte I 


CAPITOLO 1 
MONITOR MASTERCODE 


Ogni programma, non importa in quale linguaggio sia scritto, inizia la propria 
vita come una serie di istruzioni codificate ed immagazzinate nella memoria di un 
computer. Nel caso della maggior parte dei linguaggi, le istruzioni che compongo- 
no il programma sono totalmente prive di senso per l’unità centrale di elaborazione 
o CPU, il computer-nel-computer che viene alla fine chiamato ad eseguire i compiti 
imposti dal programma. 

Per superare questo problema, a metà fra il programma immesso dall’utente e la 
CPU si troverà un altro programma, molto spesso inserito nella macchina al mo- 
mento della fabbricazione, che si occupa di tradurre il programma dell’utente in 
una forma che la CPU sia in grado di comprendere. 

Il programma ‘inserito’ permanentemente, comunque, svolge un’altra funzione, 
dal momento che senza il suo aiuto sarebbe in primo luogo impossibile per l’utente 
inserire le istruzioni. 

Dal momento in cui il computer viene acceso, il programma incorporato inizia il 
suo compito esaminando la tastiera per rilevare un input dal mondo esterno. In se- 
guito raccoglie questi input e li memorizza in modo tale che possano poi venir in- 
terpretati dalla CPU. L’utente che scrive programmi in BASIC raramente è con- 
scio di questo processo. Le linee di programma vengono scritte, il tasto RETURN 
premuto e le linee diventano parte del programma — a patto che si osservi la gram- 
matica BASIC correttamente. 

Non è richiesto alcuno sforzo o pensiero particolare per inserire una nuova istru- 
zione, al termine o nel corpo del programma, dal momento che la memoria del 
computer viene automaticamente ridisposta per far posto al nuovo ingresso. 

Quando si passa a programmare in linguaggio macchina la situazione non è così 
semplice. Non ci sono facilitazioni incorporate nel computer che permettano di im- 
mettere nuove istruzioni dalla tastiera con la sicurezza che saranno automatica- 
mente memorizzate ed il contenuto della memoria riorganizzato per far loro posto. 
Il primo compito di un programmatore in linguaggio macchina è perciò quello di 
realizzare un metodo per introdurre le istruzioni, esaminare la memoria e riorganiz- 
zarla per soddisfare le necessità crescenti del programma che si sta sviluppando. 
Questo vale se le istruzioni macchina sono inserite direttamente sotto forma di nu- 


meri (forma in cui alla fine essi si presentano alla CPU) oppure per mezzo di uno 
speciale linguaggio detto ‘linguaggio assemblatore’ che facilita l'immissione e la 
comprensione dei programmi in linguaggio macchina. Lo strumento più semplice 
che permette di realizzare questa gestione della memoria si chiama ‘Monitor’, ed in 
questo capitolo costruiremo un programma Monitor flessibile che permetterà di e- 
saminare singoli bytes di memoria o grossi pezzi di essa e di modificarne a piacere 
il contenuto. 


SEZIONE 1: Inizializzazione e Menu 


MODULO 1.1 


FREMEREEEE RIETI TE EER EIA 

REM GENERAL IMITIFLISATIOH 
REMEREEEZE EEE EEE EEE 

EHSE = 16 

IF LEMCFTR$+LEN(E£1©23255 THEH CLE : GO 
19000 

16035 DEV = 1 

16646 DEFFH HESCHI = € AMI 150+495- CC AHD 15 
SFIIAT 

12009 DEFFH DECCHI = MedB+ CHD57 147 

AGG FALSE = 6: TRUE = +1 

fi POEE SIZ51.,10! POEE Sazoa. 15 


GI LI BID 


Rao toa 
2 P- DO 


Dad i 


jr pa pa aa 
Ei a Man 


= 11) 


Lo scopo di questo modulo è quello di inizializzare un certo numero di variabili 
che verranno usate più avanti nel programma. La funzione di queste variabili è 
spiegata brevemente nella tabella presentata in Appendice, ma una piena compren- 
sione sarà possibile solo quando le sezioni seguenti del programma, in cui le varia- 
bili vengono usate, verranno presentate. A questo punto è sufficiente semplicemen- 
te immettere correttamente il modulo — l’unico effetto visibile della sua esecuzione 
sarà il cambio di colore dello schermo. 


TAVOLA DI CONTROLLO 


10000 123 10920 238 10030 123 
10031 116 10032 164 10025 2 
10040 152 10050 152 19060 21 
10G070 220 


Questa tavola di controllo è qui per aiutarvi a controllare che non abbiate fatto 
errori nell’introdurre un programma lungo e complesso. Per capire come usarla, si 
veda l’appendice A, che contiene il programma di controllo da aggiungere al termi- 
ne del programma Mastercode quando iniziate, mettendovi in grado di generare le 
vostre tabelle di controllo da confrontare con quelle del testo. 


MODULO 1.2 


19001 REM TEMPFORAEY LIHES 
19010 FETUEH 
19611 REM ###END CFOMONITOR FROGRAME#$ 


Questo modulo temporaneo è posto a questo punto nel programma per permet- 
tere la chiamata, da parte della routine di inizializzazione, di una sezione del pro- 
gramma Mastercode che verrà inserita in seguito. Le linee di questo modulo ver- 
ranno in futuro cancellate con l’immissione delle prossime sezioni del programma 
Mastercode. Il formato non è problematico, così non c’è bisogno di tabelle di con- 
trollo. 


MODULO 1.3 


10100 REMESISEEEKEIETERI ERETTA TATA AA 44 

16161 FEM CONTROL ROUTINE FOR MONITOR 

1010 REMEKEEEKEEEEE EEE EIA REA 

168119 DATA ESIT TO BASIC, MEMORY MODIF: MEMORY 
DUMP. MACHIME CODE ERCLTE 

16111 DATA LOAD MACHIMHE CONE FILE. SAVE MACHIH 
E CODE FILE 

161268 DATA DISASSEMELER 

16126 DATA FILE EDITOR 

16146 DATA ASSEMELER 

16196 DATA ENI 

16200 FESTORE 

10220 *X = A 


19230 PR INT “CELU]ICLH]-------—- MACHIMHE CONE 
MONITOR =—-=-==—-- CGRMICCINMI”" 


10250 READ TE 
190260 IF T&C>"ENI" THEN PRINT TABS) X ")" T$ 
: K= M+1 : GOTO 10250 


19265 IF #<15 THEN FOR = « TO 15: PRINT 
HEKT 

10279 PRINT "COMMAND < 6 -" X-1o" Do: "5: INP 
UTT 

14300 IF TO OR T3X THEN 1A100 

16365 IF T=9 THEN PRINT "[CLHICCOWI [CINI CCD] 
[CDHI] (RONIETECROFI1 [COMICO] [CDM] CCIHI]" : CLO 
SE 1: ENI 

19310 ON T GOSUE 123100, 13200, 13500, 14300, 1410 
fi, 15200. 24200, 20000 

19329 GOTO IB100 


Ogni programma complesso deve fornire all’utente un mezzo per scegliere quale 
delle molte funzioni dovrà essere usata in seguito. Questa possibilità è realizzata 
grazie ad una routine di controllo o, più semplicemente, un menu. Il menu qui pre- 
sentato è più complesso di quanto fosse necessario per il programma corrente. 
Questo è dovuto al fatto che il Monitor è progettato in modo da poter essere più a- 
vanti esteso con le sezioni successive dell’assemblatore Mastercode. Piuttosto che 
dover inserire nuove linee di programma per tener conto delle funzioni extra che 
verranno fornite, il menu si estenderà automaticamente per prendere nota dei nuovi 
nomi delle opzioni immesse nelle frasi DATA. 


TAVOLA DI CONTROLLO 


A Ri a pi 
DEA) 


LO Li La UD 
mi 


ib 


SEZIONE 2: Uscita su schermo del contenuto della memoria 


In questa sezione del programma esamineremo quelle parti di programma neces- 
sarie per permetterci di visualizzare ordinatamente il contenuto di un’area di me- 
moria specificata. I moduli commentati qui possono sembrare insignificanti e potre- 
ste chiedervi perché non sono stati uniti per formare un solo modulo. Conoscendo 
meglio il programma Mastercode vedrete che singoli moduli possono essere richia- 


mati da parti differenti del programma. Limitare i moduli ad una ed una sola fun- 
zione particolare ci permetterà di risparmiare un certo numero di linee di program- 
ma evitando di doverle duplicare in altre sezioni di questo. 


MODULO 1.4 


11000 REMESEMEEAEAAAAAIAMAMAAAAAAAAAAAA 
1191 REM CONVERT DECIMAL TO HEX 

11002 REMESEMEREEIERE AVENTE AAA 
11G1A T=H:H$é a "" 

11920 H$ = CHR$ €FMHESST-INT£T/161#16)%+H$ 
T = IMT€T716) : IF T>@ THEN 11020 

116059 RETURN 


Questo modulo di tre linee trasforma un numero decimale in un esadecimale, 
cioè in un numero a base 16 invece che 10. I programmatori in linguaggio macchi- 
na usano quasi universalmente i numeri esadecimali, per la semplice ragione che es- 
si si conformano maggiormente al sistema aritmetico binario usato dal computer. 

Il sistema di numerazione esadecimale ha le seguenti 16 cifre:0123456789 
ABCDEF.I computer più moderni memorizzano i numeri in gruppi di 256 (da 
O a 255), e la ragione per cui l’esadecimale è più conveniente è che il massimo valo- 
re esprimibile con due cifre è 255 (15% per la cifra più significativa e 15 per l’altra). 
Usare gli esadecimali significa poter realizzare una rappresentazione molto più or- 
dinata dei valori memorizzati. Inoltre, il sistema binario usato dal computer implica 
che molto spesso numeri esadecimali significativi come 1000, (o 4096 in decimale), 
lo siano anche in termini di operazioni del computer. Iniziare a pensare in esadeci- 
male è un importante aiuto alla comprensione del funzionamento del micro. 


Commento 


11020: l’operato di questa linea è più comprensibile attraverso un esempio. Suppo- 
nete che con la variabile H si sia memorizzato il numero decimale 4875. Per con- 
vertirlo in esadecimale, dobbiamo prima riconoscere che è composto da 1% 1673 
(16î3=4096) + 3% 1672 (16î12=256) + 0*1611 (1671=16) + 11%x1670 (1610=1). 

Questa linea isola ogni unità di queste differenti potenze di 16 e le traduce quindi 
in un carattere che rappresenta la cifra esadecimale appropriata, usando la funzio- 
ne definita dall’utente FNHEX (vedi linea 10040) per selezionare il carattere cor- 


retto. Nel caso di 4875, il numero esadecimale corrispondente sarà 130B. Per le ci- 
fre con un valore compreso fra 0 e 9, FNHEX restituisce semplicemente il valore 
dell’appropriato carattere 0-9 (codici carattere: 48-57). Se il valore della cifra è fra 


10 e 15, allora si aggiunge 7 al codice carattere per portarlo nell’ambito A-F dell’in- 
sieme di caratteri del 64. 


TABELLA DI CONTROLLO 


LIMO 152 1IG0I 16, 1602 123 

1IGio 1r 11020 74 LIG0SA 142 
MODULO 1.5 

11950 REMEEEEEZEREAEATETE AREA EARADEA AA 

11951 REM CONVERT HES IH H£ TO DEC IN H 

11952 REMEKEEEEEEAAZERE EEE RA ATA 

11975 ERR = FALSE : H= 0@ ©: IF LENCH$)=M THEN 
12000 

11996 FOR « = 1 TO LENCH£i 

11999 T = FHDECCASC “MID$ CH$.&,13%): H= H#R 

ASE+T 

120109 IF T>EASE-1 CR TA THEN ERR = TEUE 
120268 HEAT X 

120534 RETUEN 


Sebbene sia più comodo introdurre numeri esadecimali, l’uso del BASIC implica 
che essi debbano venir trasformati in numeri decimali per gli usi del programma. 
Questo è realizzato dal presente modulo. 


Commento 


11975: in tutto il programma si farà uso della variabile ERR (errore) per indi- 
care che è stato scoperto un errore. Il valore normale di ERR sarà 0, che è il valore 
assegnato alla variabile FALSE nella routine di inizializzazione. Ogni volta che un 
errore viene scoperto, ERR è posta al valore TRUE, che è —1. Il vantaggio dell’uso 
di questi valori di ‘verità’ è che ERR può essere utilizzata in frasi come ER- 
R=(A >50). L’espressione fra parentesi ha un valore a seconda che sia vera o falsa. 
Se è falsa avrà valore 0, se vera —1. 

In questo modo la variabile ERR può essere usata per mostrare che qualcosa 
non va in modo molto più economico che non usando frasi del tipo: IF A >50 
THEN ERR=-1. 


11980-12020: esaminando successivamente ogni carattere della stringa H$, , que- 
sto ciclo estrae il valore decimale del carattere esadecimale usando la funzione de- 
finita dall’utente FNDEC (linea 10050). Dal momento che il ciclo parte da sinistra, 
il risultato corrente va moltiplicato per 16 per ogni successiva cifra esadecimale. Se 
viene introdotto un carattere al di fuori dell’ambito 0-F, la variabile ERR viene po- 
sta a —1 per segnalarlo ai moduli successivi. 


TAVOLA DI CONTROLLO 


11950 123 

11975 142 

15010 208 

MODULO 1.6 

12050 REMERESHEREE ERE EEE ERE 

12051 REM INPUT START ADIRESS 

12052 REMESEEEEA ERRE REI 44444 

12057 H£ = "" 

12060 INPUT "START ADDRESS € IN HEX 30"; Hf 
GOSUBI 1950 

12080 IF ERE OR HS OR H5ESS3S THEH 12066 


12696 ADI = Ho: FETUEH 


Per visualizzare sullo schermo il contenuto di un’area di memoria è necessario 
specificare la locazione di partenza in memoria. Questo viene fatto in esadecimale, 
l’input viene poi tradotto in decimale dal modulo precedente. 


TAVOLA DI CONTROLLO 


1250560 123 12051 153 Zi 
150057 162 15064 50 Zi 
15090 199 

MODULO 1.7 

11551 REM ASE CONTINUE 


11858 T$ = "" 
11860 INPUT "CONTINUE € WAN >: "i T$ 

11870 IF T$="v" THEN CO = TRUE ‘ GOTO 11895 
11889 IF T$<>"N" THEN PRINT "[CUP]": : GOTO 1 
1250 

11890 CO = FALSE 

11895 RETURN 


Questo modulo viene richiamato quando una zona di memoria è passata su vi- 


deo per chiedere all’utente se desidera proseguire con un’altra. 


TAVOLA DI CONTROLLO 


paia 
dd 


MODULO 1.8 


111600 REMEKE44EEEKHAEETEAEEEA A 444 444% 
11161 REM PYTE INTO HEX 

11102 REMEKEKHPEKERTAHATEA EEA AA 
11110 H = PEEKSAD: : AD = AHI 

11129 GOSLE 11000 

11139 IF LENCH$£}<2 THEN H£ = "@"+H$ 
11140 02$ = CZ$+H£ 

11159 RETURN 


Questo modulo esegue concretamente il compito di estrarre un valore dalla loca- 
zione di memoria specificata dalla variabile AD. Quindi viene chiamato il modulo 2 
per trasformare il valore in esadecimale. Le cifre esadecimali composte da un unico 
simbolo vengono completate con uno zero in prima posizione, in modo da assicu- 
rare ‘n formato standard di due cifre per ogni byte della memoria. Infine il numero 
esadecimale viene sommato a 02$, per mostrare sullo schermo il contenuto della 


memoria. 


TAVOLA DI CONTROLLO 


11100 123 11181 66 11162 125 
111ia sa 11120 1559 11130 223 
11140 SZ 11156 142 

MODULO 1.9 


13300 REMEKEEAAEARERIAHEAAAAA AAA 
13301 REM DUMP MEMORY TO SCREEN 


13319 GOSUB 12050 

133209 PRINT "[CLH])" : FOR X1 = 1 TO 18 
AD: GOSUE 11000 

13340 02% = "" : 01$ = H$ : 03£=""" 
13350 FOR 42 = ATO 7 

133609 GOSUB 11100 : 02% = 02$+" " 
13375 IF H>31 AND Ho 95 THEN 03$ € 


il 
pn) 
dA] 
» 
+ 
n 
pu 
2 
* 
TI 


3/1 GOT0 13350 

13377 03$£ = 03$5+"," 

195359 MEST «2 

12390 PRINT 01£ TABCS: 02 THECSI1I: DIE 
13400 NEST «1 

13419 PRINT : GOSUB 11550 : IF CO THEH 
13440 RETURN 


Abbiamo ora presentato tutti i moduli necessari per definire un indirizzo iniziale 
e per prelevare dati dalla memoria. Possiamo ora procedere con la parte di pro- 
gramma che effettivamente fa qualcosa. Avendo definito un punto di inizio, questo 
modulo visualizza sullo schermo il contenuto di un’area di memoria. 


Commento 


13320: il ciclo X1 sarà usato per stampare 18 linee, ciascuna contenente otto valo- 
ri letti in memoria a partire dall’indirizzo ora memorizzato in AD. 


13350-13380:i valori esadecimali forniti dal modulo precedente vengono memoriz- 
zati nella stringa 02$. Se il valore contenuto in una particolare locazione di memo- 
ria è il codice ASCII di una lettera o di una cifra, quel carattere verrà immagazzi- 
nato nella stringa 03$, per venir visualizzato a fianco dei valori relativi ad esso. 


Nelld massima parte dei casi i caratteri visualizzati non avranno senso, poiché ri- 
sulta perfettamente casuale il fatto che un numero rappresenti il codice di un carat- 
tere stampabile. In ogni caso, quando si esaminano aree di memoria come l’area 
delle variabili del 64 oppure la struttura del programma BASIC stesso, o un pro- 
gramma macchina contenente stringhe, questa caratteristica risulterà indispensabi- 
le per dare un quadro esatto di ciò che la memoria contiene, dal momento che ver- 
ranno visualizzate tutte le stringhe in essa presenti. 


TAVOLA DI CONTROLLO 


A 123 1129 13 

Mo 1655 A 246 13 

A 109 H 100 13 

rara 15 | A 44 13 

ni 43 A GE 12 
Riassunto 


Una volta introdotta nel computer questa sezione, avrete la base funzionante 
dell’intero programma. Nelle prossime sezioni, troverete impiegati molti dei moduli 
già descritti, infatti funzioni come la conversione in esadecimale sono comuni a tut- 
te loro. Prima di procedere col resto del programma, familiarizzatevi con quanto 
visto finora. Esaminate ad esempio l’area di memoria che contiene il programma 
stesso (e che inizia alla locazione 801 esadecimale) e l’area delle variabili. Questa 
sezione del monitor è di per sè un potente strumento per scoprire i segreti della me- 
moria del 64. 


MONITOR: Visualizzazione della memoria dall’indirizzo 801 esad. 


390 dol do c 
241 dA CE GS; 
da SPO ZA ZA 
GSi 2h 2A 2h 
S59 ZA 2A SH 
SEL ZA SA ZA 
ei 27 42 di 
STl SI Se da Ss 
Sri 20 

SS1 AR 

Soa sr: 


CONTINUE © eo i 


SEZIONE 3: Modifiche della memoria 


Avendo imparato come esaminare la memoria, procediamo ora al passo succes- 
sivo, cioè ad alterarne il contenuto. In questa sezione presentiamo altri due moduli 
che vi permetteranno di muovervi avanti e indietro nella memoria, visualizzando il 
contenuto dei singoli byte e, se lo desiderate, di alterare il contenuto del singolo by- 
te visualizzato. 


MODULO 1.10 


1 REMEKEEEERE EEE REITERATA 
KEM GET 1 EYTE 

- REMERSERE ERE RI AREE EER 
r, HE = ULI 

IHPUT "EYTE € IM HEK co! "i H£ 

fi GOSUE 1195 

2640 IF ERRE CE HAG 0 H>s55 THEH PRINT 
UEGUPIUO O GOT0 DEA 

15656 RETUEH 


Sulla base dei moduli precedenti dovrete avere poche difficoltà nell’accertarvi 
che questo modulo accetta un valore esadecimale compreso fra 0-FF (0-225), atti- 
va una traduzione in decimale e restituisce questo valore al modulo successivo, da 
cui è richiamato. 


TAVOLA DI CONTROLLO 


135000 123 135001 52 
1350907 165 15010 1F1 
100460 192 13050 142 


MODULO 1.11 
13100 REMIRERERIERIRE RE ERRE RE ERE RE 
13101 REM MEMORY MODIF 

13102 FEMEHEHREHEAREREE RE AREE RE AREE 
151169 GOSUE 12050 

13120 H = AD: GOSUE 11600 : PRINT H$ TA 

Eh n" pe 4 ° O2£ = ULI] 

13140 GOSUE 11160 : AD = AD-1 ©: PRINT H$ 
SPCCEI | 

13150 Tg = "" 

13160 INPUT " +.-.1.E : "; T£ 

13179 IF T8="+" ANI ADCESS25 THEN AI = A 

T+10: GOTO 1312404 

13180 IF T#="-" AND ADSM THEN AD = AD-1 


GOTO 153126 

13190 IF T$="E" THEN RETURH 

13200 IF T#<>"I" THEN PRINT"[CUPI][CUP]" 
* GOT013120 

13219 GOSUE 13000: FOKE ADH : GOTO 131 
20 


Lo scopo di questo modulo è quello di permettere all’utente di muoversi in me- 
moria da un indirizzo di partenza specificato e modificare il contenuto di singoli by- 
te. Gran parte del modulo si occupa di far visualizzare sullo schermo in modo com- 
prensibile i valori di ciascun byte e di muoversi in memoria. I cambiamenti del con- 
tenuto della memoria sono eseguiti dall’ultima linea, che richiama anche il modulo 
precedente. 


Commento 


13120-13140: ottenuto l’indirizzo di partenza, viene visualizzato l’indirizzo del by- 
te corrente, insieme al valore contenuto. 
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13160-13210: il modulo fa uso di quattro simboli particolari, o ‘prompt’: ‘+’ signi- 
fica passaggio al prossimo byte, ‘—’ significa passaggio al byte precedente ed ‘E’ si- 
gnifica uscita da questo modulo. Il prompt rimanente è ‘1°, che serve a richiamare il 
modulo precedente e permette di inserire un nuovo valore nel byte corrente. 


TAVOLA DI CONTROLLO 


13 124 131691 112 13 
153 163 13120 220 15 
15 14 13160 192 13 
13 116 1315959 211 13 
13 SZ 

MODULO 1.12 


13500 REMEEEEEEZERZA ATA RA RANAAAARAA AA 
13501 REM MACHINE CODE EXECUTE 

13502 REMEEEEEEA RETE AMIATA NAMARE AAA 
13519 GOSUB 12050 : SYS AD : RETURN 


Qualora desideriate usare il monitor per introdurre programmi direttamente in 
memoria in forma esadecimale, questa routine di una linea vi permetterà di chiama- 
re la routine di linguaggio macchina senza uscire dal programma. È cosa saggia 
non far eseguire programmi in linguaggio macchina prima di aver salvato il pro- 
gramma introdotto fino a quel momento. 


TAVOLA DI CONTROLLO 


23 15501 15 135502 123 
A 


SEZIONE 4: Salvataggio e caricamento del file 
Ora che siete in grado di immettere nuovi valori in memoria e quindi di sviluppa- 


re un programma in linguaggio macchina, dovete anche avere la possibilità di sal- 
vare quei programmi che in seguito svilupperete ed immetterete. Dovete inoltre a- 
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vere la possibilità di richiamare quei programmi da disco o nastro, a seconda del 
mezzo con cui li registrerete. Le quattro brevi routine seguenti hanno il compito di 
offrirvi queste possibilità. 


MODULO 1.13 


11250 REMEGEKKEPETETAAAAARAAAAAIAEAAAAA 
11251 REM INPUT FILE NAME 

11252 GOSUE 255009 : IF DEV=4 THEN 11290 
11255 IN$ = "" i 

112650 INPUT " FILE MAME : "; IN&£:T=L 
ENCINSOI 

11229 IF T=S16 OR TEA THEH FRINT "[COWIJFI 
LE MAME IHVALIO" © GOTO 11266 

11290 RETUEN 


Il salvataggio di un gruppo di informazioni su nastro o disco avviene raggrup- 
pandole in forma di ‘file’, cioè una locazione dotata di nome che deve essere anzi- 
tutto ‘aperta’ prima che le informazioni vi vengano immesse e quindi chiusa quan- 
do tutte le informazioni necessarie sono state memorizzate. 

Quando le informazioni vengono richiamate dev'essere specificato il nome del fi- 
le. Questo modulo permette di inserire il nome di un file. 


TAVOLA DI CONTROLLO 


11200 123 11251 19% 11252 119 
112503 £41 11260 137 112500 216 
11290 142 

MODULO 1.14 

11200 REMESEKEREEE EE EE EEE 
11261 FEM IMPUT FINISH ADDRESS 

11202 REMEEEEEEERE EEA EEE EATER 
11205 Hg = "" 


L12160 INPUT “"FIHISH ADDRESS © IM HEI 
"5 H$ : GOSUE 11950 
sis 239 IF ERR OF HEG OR H*65535 THEN 1126 


; 1246 ER = Ho: RETUEH 


I programmi linguaggio macchina che in seguito svilupperete con l’aiuto dei pro- 
grammi di questo libro saranno poi contenuti in blocchi di memoria. Per salvarli il 
programma necessita di due informazioni: il punto di partenza ed il termine del 


blocco. 


Abbiamo già una routine che ottiene l’indirizzo iniziale, questa esegue la stessa 


funzione per l’indirizzo finale. 


TAVOLA DI CONTROLLO 


11200 120 11201 70 
11205 162 LIZIO 161 
112460 ZOO 


MODULO 1.15 


14161 FEM MACHIHE CODE SAN 


14102 REMEESEREEERE RE EEE EE EE 4 
141169 GOSUE 11256000 GOSUE 120501 GOSUE 
11200 

14115 TE = "HW" : IF ar THEN THPUT "EN 
EFWRITE ERISTING FILE © *WHo 000"; TE 
14116 IF T$="Y" THEM THE = "BG: "+IME 
14120 IF DEV=S THEH IM$ = IMEP". 5.1" 
14125 IF SAZER THEH 14199 

14150 OPEH 2, D0EV. 2, INE © PRINTR SAD: FP 
RINT# Z.EM 

14156 FOR & = ADOTO ER : PRINTA 2, PEEESA 
300 MEST i PRINTER 200 CLOSE £ 

14190 RETUFEH 


Ora che siamo in grado di dare un nome al file in cui sarà contenuta l’informa- 
zione presente in un’area di memoria e di specificare il punto di inizio e di termine, 
possiamo procedere ed immettere questo modulo, che memorizzerà l’informazione 
su nastro o disco. 


Commento 


14125: questa linea controlla semplicemente che l’utente non abbia definito un 
blocco di memoria la cui locazione finale sia precedente rispetto a quella iniziale. 


14130: viene aperto un file, in questo caso un file d’uscita, e la destinazione dell’in- 
formazione viene stabilita in base al valore della variabile DEV (device = dispositi- 
vo). Nel listing di questo programma essa è posta uguale ad 1 (linea 10035), cosa 
che dirige l’uscita verso il registratore a cassette. Se usate un disco, DEV dovrebbe 
essere posta uguale ad 8 nella linea 10035. Una volta aperto il file d’uscita, le prime 
due informazioni da inserirvi sono l’indirizzo iniziale (AD) e finale (EA). Più avanti 
nel programma verrà aggiunta la possibilità di cambiare a piacere il numero di di- 
spositivi. 


14150: il contenuto di ogni byte del blocco di memoria da salvare viene memoriz- 
zato singolarmente nel file. 


TAVOLA DI CONTROLLO 


141668 14161 46 14162 123 
14116 de 14116 69 
134126 z 14136 105 
14156 de 

MODULO 1.16 


14500 REMEEKEEEKEHEKEA ZZZ 
14391 FEM MACHINE CODE LONI 

14002 REMEEEFEERZERE TEZZE EEE 
14316 GOSUB 11250 : IF DEV=S THEN IN$ = 
IH$+".5,R" 

14320 OPEN 2, DEV.G,.IN$ : INPUT# 2.5A.EM 
: IF ST THEN CLOSE 2 : RETURN 

14350 FOR « = SA TO EA: INPUT 2.T : FO 
KE #.T : MEXT : CLOSE 2 ©: RETURN 
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Questo modulo è semplicemente l’immagine speculare del precedente. Invece di 
mettere informazioni in un file, questo modulo preleva dal file informazioni prece- 
dentemente memorizzate e le reinserisce nella memoria del computer. 


TAVOLA DI CONTROLLO 


14561 SI 
14320 174 


Sommario 


Una volta immesso l’intero monitor, siete in grado di sfruttarlo, sebbene tutta la 
sua potenzialità verrà ben compresa quando immetterete il resto del programma 
Mastercode. Provate ad immettere una nuova linea: 0A=13. Chiamate l’opzione 
del menu che permette di cambiare la memoria ed alterate il contenuto del byte 805 
immettendovi l’esadecimale 8F (143). Listate il programma e vedrete che la vostra 
prima linea è cambiata in una frase di commento (143 rappresenta REM nel file di 
programma). Se non siete ben sicuri di ciò che state facendo è utile che non cer- 
chiate ora di modificare troppe altre locazioni di memoria e certamente non prima 
che abbiate salvato correttamente la vostra versione finale del monitor. Se volete 
fare un po’ di confusione provate a modificare alcuni dei byte attributo dei colori 
nelle posizioni D800-DBFF esadecimali, della memoria colore dello schermo. Er- 
rori commessi in questa zona non saranno disastrosi. 
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CAPITOLO 2 
DISASSEMBLER MASTERCODE 


Dopo aver inserito il programma monitor, che vi permette di esaminare aree di 
memoria e di cambiarne il contenuto, proseguiamo col passo successivo, che vi per- 
metterà di tradurre il contenuto di un’area di memoria in cui si trovi un programma 
in linguaggio macchina in una forma più comprensibile. Questa forma più ‘leggibi- 
le’ per un programma in codice macchina si chiama linguaggio assemblatore. 

Il vantaggio di lavorare con il linguaggio assemblatore è che usando i POKE per 
immettere numeri direttamente in memoria possiamo immettere un programma in 
linguaggio macchina, ma non c’é una corrispondenza immediatamente evidente fra 
i numeri inseriti o riletti dalla memoria e le operazioni che il programma eseguirà. Il 
programma risulta semplicemente una lista di numeri e solo un numero molto ri- 
stretto di programmatori è in grado di leggere un programma scritto in quella for- 
ma senza usare una tabella di riferimento contenente i codici ed il loro significato. Il 
linguaggio assemblatore fornisce un mezzo per immettere istruzioni significative 
anche per l’utente con poca pratica, che danno una rappresentazione esatta di ogni 
istruzione macchina del programma. In altre parole il linguaggio assemblatore con- 
siste di una serie di istruzioni, o codici mnemonici, corrispondenti alle singole ope- 
razioni macchina che il chip 6502/6510 è in grado di riconoscere ed eseguire. 

Le istruzioni in linguaggio assemblatore saranno normalmente composte da due 
parti: 


1) un codice operativo (opcode) che specifica il tipo di operazione che si chiede al 
chip 6502/6510 di compiere, come spostare un numero da un luogo ad un altro in 
memoria, confrontare due valori o eseguire un’operazione aritmetica su di un valo- 
re; 

2) una volta definito il tipo di operazione da eseguire è necessario definire il numero 
su cui l’operazione dev’essere compiuta. Questa parte dell’istruzione è nota come o- 
perando e può consistere di un numero su cui si agirà direttamente o dell’indirizzo 
di memoria di un numero su cui si dovrà operare. 
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Una tipica istruzione in linguaggio macchina, su cui si basa la traduzione del lin- 
guaggio assemblatore, consisterà perciò di un byte che specifichi l’opcode e di uno 
o due byte usati per ritrovare il numero su cui eseguire l’operazione. Alcuni tipi di i- 
struzione necessitano di un solo byte, quello che precisa il solo opcode, dal momen- 
to che esse implicano che il valore su cui operare sia rappresentato da una locazio- 
ne prefissata che non è necessario menzionare esplicitamente. 

Per tradurre un programma dal codice macchina in linguaggio assemblatore c’è 
bisogno di un programma che sia in grado di identificare un opcode e quindi di de- 
cidere quanti dei successivi byte di memoria (0,1 o 2) rappresentino l’operando as- 
sociato a quel codice operativo. Un programma in grado di far questo è detto ‘di- 
sassembler”. Il suo effetto è quello di estrarre numeri incomprensibili dalla memoria 
e di tradurli in qualcosa che con un po’ di pratica possa essere compreso dall’uten- 
te. 

La spiegazione breve e molto semplificata data sopra richiederà un po’ di atten- 
zione se questa è la prima volta che sentite parlare di un disassembler. Una volta 
però che abbiate ben chiaro il concetto nella vostra mente dovreste avere pochi 
problemi nel comprendere le basi su cui lavora la seguente sezione del programma 
Mastercode. Per mezzo di una serie di tabelle memorizzate in stringhe, il program- 
ma è in grado di identificare le istruzioni in linguaggio macchina di una specifica a- 
rea di memoria e di visualizzare il tipo di operazioni ed i loro operandi in linguaggio 
assemblatore. Il programma può essere usato in almeno due modi: 


a) per l’utente che sta sviluppando programmi in linguaggio assemblatore, il disas- 
sembler permette di controllare e correggere più facilmente il programma in memo- 
ria durante il procedimento di immissione; 


b) per coloro che vorrebbero approfondire la loro esplorazione della memoria del 
Commodore 64, il programma così com'è è in grado di dare una traduzione com- 
pleta della ROM della macchina, cioè del programma incorporato e permanente 
che fa in pratica funzionare la macchina. In questo modo si può giungere ad una 
comprensione migliore del lavoro interno del computer ed è possibile esaminare il 
modo in cui le singole routine della ROM possano venir usate effettivamente nei 
programmi utente. 
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SEZIONE I: Predisposizione delle tabelle 


MODULO 2.1 


12200 REMESEEEEEEEEZE ATI TATEATEAEEA4 
12201 REM HEX LOADER 

12202 REMEEMEKEEEEA REATI 
1DZZIO T1$ = "" 

122209 FOR «1 = 1 TO LENTE: STEP 2 

12230 T1£ = T1$+CHE$ €FNHIECCASO «MID €T 
$, 1,111 #165+FNDECCASC €MIDE «TE. &1+1,10 


260 MEXT_K1 
7A RETURM 


Il vero scopo di questo modulo non sarà chiaro finchè non verranno spiegate le 
tabelle del modulo successivo. La sua funzione è quella di estrarre i valori dalle ta- 
belle e di compattarli in stringhe. I valori delle tabelle sono stati disposti nella forma 
di valori esadecimali a due cifre (cioè numeri nell’intervallo 0-255 decimale). Que- 
sto modulo converte coppie di valori esadecimali in singoli caratteri ASCII. I carat- 


teri ottenuti in questo modo possono essere raggruppati in una stringa (TI$). 


TAVOLA DI CONTROLLO 


S201 167 
2224 216 


MODULO 2.2 


19000 REMEKHKKEKFPEEEETA TETTE 44 
19601 REM INITIALISE DECODER THELES. 
19002 REMEKKKEKPPEREET AEREA EE 4 
19005 BASE = 16 

19007 DEFFH DECCHI = K-d4B8+CA2571%7 
196010 DIM TASC4! 


19011 T$ = "GAZ23S38392202 38242202383 
p220238" 
19012 T£ = T5+"0922382939220239002238393 


S2202258" 


NI et Li 
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190913 T$ 
cRl2rao”" 
19614 T$ 
Galerao”" 
19015 T$ 


E172038" 

19016 T8 = 

8172032" 

19017 T$ = 

PRASSI! 

19018 GOSUE 12200 : 

19019 T£ = "Acon28 

SO02338" 

19020 T8 = T#+"38 

12F3038" 

19021 TE = T#+"Q32F38 

92F3238" 

19022 T8 = T$+"1FIDIE3S1F1ME3S331032381 

FIDIESS" 

19023 T& = T$+"0410382351F1IM1E38101024381 
FIDIE3S" 

19024 T$ = T$+"131138381311143S1A1115381 
3111438" 

19025 T£ = T$+"08113838281114380E1138383 
8111438" 

19026 GOSUB 12200 : TASCA) = TASCOI+T18 

19027 T8 = = "122E3838122B1838192B21381 
22 ZE 1 8235 u 

19028 T$ = T$+"052F3838382B1828202B39383 
82E18" 

19629 GOSIIE 12200 : TA$CQ) = TASCOV+T1$ 

19030 T8£ = "1711166112011CC1381114411 
BI11AAI" 

19031 T£ = T$+"C71166611201CCC1381114411 
E111AR1" 

19032 T® = T$+"171116611201CCC1281114411 
EL11AA1" 

19633 T£ = T$+"1711166112019CC1351114411 
ELMAR" 

19034 T£ = Té+"171166611111CCC1381144511 
ELL1ALI" 

19035 T£ = T&+"272166611211CCC1381144511 
E11AAE1" 

19036 TE = T$+"271166611211CCC1381114411 
E111ARI" 

19037 T£ = T#+"271166611211CCC1381114411 
ELL1A" 


15 5 GOSUE 1252060 i TH&135 = TIS+CHE£$ 1 
6 

19048 TH$CZ1 = "AICANDIASI ECCECSEE 
GEITEMIEMEEPLERKEENVCENE" 

19041 TR$ 21 = TH£C22+" COCCO DICO IC VCMPCE 
«CPY DECIDE DE TEORIMCIHEK" 

19042 TA$C21 = TREC2I+" IMM.IMP.ISFLDALDELD 
YLSENOPORAPHAFHFFLHFLP" 

19043 TRéC21 = TASC2+"ROLROFRETIRTSSECSE 
CSEDSEISTASTESTITHRATA" 

19044 TH$C21 = THEC21+"TSETRATESTTA? 
19046 RETURH 


Queste tabelle apparentemente scoraggianti sono in realtà assai semplici una 
volta che si sia ben compresa la spiegazione generale data sopra del lavoro di un di- 
sassembler. 

Le tre sezioni della tabella definite fra le linee 19011 e 19029 vengono usate per 
creare, attraverso chiamate al modulo precedente, una riga della matrice TA$, con- 
tenente caratteri il cui codice cada nell’intervallo 0-56. Questi valori puntano ad 
una tabella seguente contenente i nomi, in linguaggio assemblatore, dei 56 tipi di 
codice operativo disponibili quando si esprima un’istruzione macchina in linguag- 
gio assemblatore, più un codice usato per segnalare che è stato rilevato un codice 
operativo non valido. Nel codice macchina del 6502/6510 esistono più di 150 codi- 
ci operativi possibili, perché allora solo 56 rappresentazioni mnemoniche in lin- 
guaggio assemblatore? La risposta a questa domanda è che i codici operativi del 
linguaggio macchina possono essere raccolti in gruppi, ad esempio quelli che cari- 
cano un valore nell’accumulatore, che abbiano una rappresentazione mnemonica 
comune. All’interno di ciascun gruppo sussistono però grosse differenze fra gli ope- 
randi, cioé nel modo di reperire il valore da elaborare. Quindi ogni codice operativo 
sarà associato ad un unico tipo di operando, mentre un codice mnemonico potreb- 
be venir associato a parecchi tipi diversi di operando al momento di tradurre il pro- 
gramma macchina in linguaggio assemblatore. 

Così un codice operativo di valore 127 avrebbe un punto di ingresso nella posi- 
zione 127 di TA$ (0). Il codice ASCII del carattere contenuto in quella posizione 
verrà usato per attribuire un valore fra 0 e 56. Questo valore sarà poi utilizzato per 
puntare a tre caratteri della sezione di tabella definita nelle linee 19940-19944. 
Queste cinque linee di testo, una volta suddivise in gruppi di tre caratteri, rappre- 
sentano tutte le possibili rappresentazioni mnemoniche del linguaggio assemblatore 
6502/6510 per i vari codici operativi. 
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Le rimanenti sezioni delle tabelle, definite dalle linee fra 19030 e 19037 danno il 
tipo di operando associato al particolare codice operativo. I tipi di operando ver- 
ranno spiegati in maggior dettaglio in seguito. 


SEZIONE 2: operandi e loro tipi 


Come detto nella prefazione, questo libro non intende fornire un’introduzione al 
linguaggio macchina del 6502/6510. Si presuppone che chi voglia usare questo li- 
bro sia già in parte a conoscenza di un certo numero di concetti che stanno alla ba- 
se della programmazione in linguaggio macchina o in linguaggio assemblatore op- 
pure che questo libro venga usato insieme ad un testo introduttivo generale sul lin- 
guaggio assemblatore del 6502/6510 che spieghi le varie funzioni disponibili sul 
chip in questione. È comunque necessario a questo punto per la comprensione del 
programma fornire qualche breve spiegazione sul modo in cui il chip 6502/6510 in- 
terpreta gli operandi, cioè i valori delle locazioni di memoria su cui è in grado di 
compiere le sue 56 operazioni. 

Il chip 6502/6510 è in grado di riconoscere 11 differenti metodi, noti come modi 
di indirizzamento, per ottenere il valore su cui operare in un programma in codice 
macchina. Ogni singolo codice operativo richiede l’uso di uno di questi 11 metodi 
diversi. Il programma disassembler dev’essere in grado di riconoscere il codice ope- 
rativo e quindi di estrarre da esso il tipo di indirizzamento da utilizzare. 


Le due forme più semplici di indirizzamento sono l’indirizzamento in accumula- 
tore e l’indirizzamento implicito: 
1) Indirizzamento in accumulatore: alcuni codici operativi specificano, senza espli- 
citare ulteriormente un valore o un indirizzo di memoria, che l’operazione da com- 
piere deve essere eseguita sul contenuto del registro accumulatore della CPU. Un 
esempio di, questo tipo di indirizzamento può essere lo ‘shift left accumulator’ 
(SLA in linguaggio assemblatore), che fa scorrere i bits 0-6 dell’accumulatore verso 
sinistra, moltiplicando così per due il valore rappresentato da quei bit. Quando si 
specifica un’operazione di questo tipo non c’é bisogno di ulteriori precisazioni ed è 
necessario un solo bit di memoria per rappresentare un'istruzione di questo tipo in 
un programma di codice macchina. 


2) Indirizzamento implicito: l’indirizzamento in accumulatore è un caso particolare 
di questo modo di indirizzamento. Ci sono altri codici operativi che specificano im- 
plicitamente il luogo in cui trovare il valore da elaborare. Un esempio di questi può 
essere ‘trasferisci l’accumulatore al registro Y° (TAY). L’effetto di questa operazio- 
ne è esattamente quello enunciato e non c’è altra necessità di dire come ottenere il 
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valore da trasferire o dove dovrà essere posto. Anche questa è un’istruzione mac- 
china da un byte. 


3) Indirizzamento immediato: i codici operativi che impiegano questo tipo di indi- 
rizzamento richiedono che il valore su cui operare venga specificato insieme al co- 
dice operativo stesso, per mezzo di valori compresi fra 0 e 255, o del possibile con- 
tenuto di un singolo byte di memoria. Un esempio di codice operativo di questo ti- 
po è ‘load accumulator immediate’ (LDA). Un’istruzione contenente questo codice 
operativo potrebbe essere LDA 127. L’effetto di questa istruzione sarebbe quello di 
caricare nell’accumulatore il valore 127. Tradotto in codice macchina questo tipo 
di istruzioni richiede un byte di memoria per specificare il codice operativo ed un 
altro byte per specificare il valore su cui operare. 


4) Indirizzamento relativo: viene impiegato quando in un programma è necessario 
utilizzare dei salti ed è richiesto un valore per specificare la locazione di memoria 
cui il programma dovrà saltare durante l’esecuzione. Come per il tipo precedente di 
indirizzamento, il valore dovrà essere nell’intervallo 0-255 ma questo intervallo è 
suddiviso in una metà positiva ed una negativa, con i valori 0-127 che provocano 
un salto positivo ed i valori 128-255 uno negativo (viene sottratto 127 dal valore in 
oggetto). Il salto è misurato relativamente all’indirizzo del byte seguente l’istruzione 
di salto. Un esempio di questo genere di codice operativo può essere ‘branch non- 
zero’ (BNE). Un’istruzione contenente questo codice operativo potrebbe prendere 
la forma BNE 127, l’effetto dell’istruzione sarebbe quello di saltare in avanti di 127 
byte prima di riprendere l’esecuzione del programma nel caso che l’operazione pre- 
cedente del programma avesse dato un risultato diverso da zero. L’indirizzamento 
relativo, come i tipi precedenti, impiega un byte per il codice operativo ed un byte 
per l’operando. 


Prima di discutere i restanti modi di indirizzamento è necessario comprenderne 
due tipi che non sono implementati singolarmente ma formano uno la base dell’al- 
tro: 

a) Indirizzamento indicizzato: questo metodo impiega uno dei due registri del chip 
6502/6510 noti come ‘registri indice’. 


Questo tipo di codice operativo usa un operando che specifica un indirizzo di 
memoria ma, prima che questo indirizzo venga utilizzato, esso o il suo contenuto 
vengono modificati aggiungendovi il contenuto presente di uno dei registri indice. 
Allora un'istruzione che usa l’indirizzamento indicizzato richiede che: 

I) ci sia un valore nel registro indice 

II) l’operando specifichi un indirizzo di memoria. 

b) Indirizzamento in pagina zero: si riferisce al fatto che sebbene il chip 6502/6510 
abbia solo cinque registri (locazioni nel chip in cui si possano facilmente porre ed e- 
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laborare valori) accessibili al programmatore in linguaggio macchina, questa limi- 
tazione al confronto di altri popolari chip di CPU è superata dalla possibilità di 
considerare l’intera area di memoria dall’indirizzo 0 all’indirizzo 255 come una se- 
rie di 128 registri a due byte che possono venir utilizzati dalla CPU per operazioni 
varie. L’indirizzamento in pagina zero è il modo di indirizzamento che rende acces- 
sibile quest'area di memoria. 


Tornando ora ai principali modi di indirizzamento forniti dal chip 6502/6510 
troviamo: 


5) Indirizzamento indicizzato in pagina zero: in questa forma di indirizzamento so- 
no combinati i due metodi presentati sopra. In un’istruzione di questo tipo il valore 
contenuto nel registro indice potrebbe essere sette, nel qual caso l’operando a due 
byte si riferirebbe ad un indirizzo in pagina zero della memoria (0-255), a cui an- 
drebbe sommato il contenuto dello specificato indice. 


6) Indirizzamento indiretto: qui l’operazione specificata dal codice operativo verrà 
eseguita su di un indirizzo non direttamente espresso nell’istruzione assembler, ma 
contenuto nei due bytes al cui indirizzo punta l’operando a due byte. Un esempio di 
istruzione di questo genere può essere ‘jump’ (JMP). Questo codice operativo sa- 
rebbe seguito da un operando a due byte. L’operando non è l’indirizzo di memoria 
cui il programma in esecuzione dovrebbe saltare, piuttosto i due byte che iniziano 
all’indirizzo specificato contengono un indirizzo. È questo secondo indirizzo quello 
cui il programma dovrà saltare. Quindi JMP ($A AAA) non indica un salto all’indi- 
rizzo AAAA, ma all’indirizzo rappresentato dal valore memorizzato nei due byte 
di memoria $AA AA ed $AAAB. 


Altre due forme di indirizzamento indiretto disponibili sul chip 6502/6510 usano 
il concetto di indirizzamento indicizzato descritto sopra: 


7) Indirizzamento pre-indicizzato: come per un normale indirizzamento indiretto, 
gli operandi di questo tipo contengono indirizzi ai quali si troveranno i valori da e- 
laborare. Però prima di ottenere l’indirizzo iniziale vengono aggiunti operandi 
pre-indicizzati al contenuto del registro X della CPU. Così se il registro X contiene 
$100 e l’operando è $100, l’indirizzo in cui si cercherà il valore desiderato è $200. 


8) Indirizzamento post-indicizzato: qui l’operando specifica una locazione di me- 
moria dalla quale viene prelevato il contenuto che si somma a quello del registro Y 
della CPU. Il risultato è un indirizzo sul cui contenuto si eseguirà l’elaborazione. 


9) Indirizzamento assoluto: in questo caso l’operando a due byte specifica un indi- 
rizzo di memoria dove si troverà il valore su cui operare. Ad esempio l’istruzione 
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‘load accumulator’ usata con questo tipo di indirizzamento potrà avere la forma 
LDA $AAAA, che avrebbe l’effetto di caricare nell’accumulatore il valore conte- 
nuto nel byte SAAAA della memoria. 


10 e 11) Indirizzamento assoluto X ed assoluto Y: in questi due tipi l’indirizzo spe- 
cificato nell’operando a due byte viene sommato al contenuto del registro X o Y 
per ottenere l’indirizzo finale del valore da elaborare. Se ad esempio il contenuto del 
registro X è $5 e l’operando è $SA AAA, l’indirizzo del valore da elaborare per e- 
sempio con un’operazione del tipo LDA $SAAAA,X sarebbe contenuto nel byte 
$AAAF della memoria da cui verrebbe passato nell’accumulatore. 


Date queste brevi spiegazioni sui diversi tipi di operandi che il chip 6502/6510 è 
in grado di riconoscere, dovreste trovare abbastanza facili da seguire senza troppi 
commenti le sezioni del programma che si occupano di creare le istruzioni in lin- 
guaggio assemblatore a partire dalle equivalenti in linguaggio macchina. Nei modu- 
li seguenti, quando un codice operativo è prelevato dalla memoria, il programma ri- 
caverà il corretto modo di indirizzamento per quel codice operativo accedendo alle 
tabelle memorizzate nella sezione precedente, ottenendo un valore che registrerà 
nella variabile OP (operando). Il valore di OP tradotto in un metodo di indirizza- 
mento è riportato nella tavola qui sotto, cui troverete utile far ricorso seguendo i 
moduli del programma disassembler. 


VALORE DI ‘OP’ MODI DI INDIRIZZAMENTO 


Accumulatore 

Implicito 

Immediato 

Relativo 

Indicizzato pag. 0, X 
Indicizzato pag. 0, Y 

Pag. zero 

Pre-indicizzato indiretto (X) 
Post-indicizzato indiretto (Y) 
Assoluto indiretto 
‘Assoluto indicizzato, X 
Assoluto indicizzato, Y 
Assoluto 


\0_ 0 4 \ LU a UN - SD 


dd 
N —- SO 
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TAVOLA DI CONTROLLO 


190600 123 196001 139 19002 123 
19065 116 19007 132 19010 228 
190911 136 19012 89 196013 72 

19614 90 19015 S1 19016 116 
19017 935 19015 241 19619 164 
19620 130 19621 154 19052 226 
19023 193 19024 &1 19025 97 

190926 213 19927 139 196025 58 

196029 212 19630 162 19021 141 
19632 112 190353 108 19034 111 
19035 147 19036 125 196037 11 

19058 75 19040 84 19041 175 
19042 10 19043 S2 19044 238 
19046 142 

MODULO 2.3 


15450 REMERK44PREEE AMET ZTA TERZI A E 
15451 FEM ACCUMULATOR C0P=0% 

15452 REMEKEKKPRKEE ATER AEREI 
15460 01$£ = O1s+"A" 

15566 FEM IMPLIED <OP=10 

15519 FETURH 


Questo breve modulo si occupa dei due modi di indirizzamento più semplici: 
a) indirizzamento in accumulatore: tutto ciò che si richiede per disassemblare que- 
sto tipo è l’aggiunta di ‘A’ al codice operativo standard. 

b) indirizzamento implicito: qui il codice operativo stesso sottintende il suo operan- 
do, quindo non c’è bisogno di alcuna azione. 


TAVOLA DI CONTROLLO 


154560 120 15451 168 15452 123 
15460 1605 15500 da 15510 142 


MODULO 2.4 


15551 REM IMMEDIATE «0P=2 
15552 REMEEEEEEKEEZE EEE EEA EEE 
15550 GOSUE 111606 

155708 01£ = M1£+"#£"+H% 

15524 RETUEH 


Questo modulo si occupa dell’indirizzamento immediato. Il byte seguente il codi- 
ce operativo viene interpretato come un operando nell’intervallo 0-255. 


TAVOLA DI CONTROLLO 


Sa LZ 15551 1259 15992 120 
Lane 166 19556 135 15000 142 


MODULO 2.5 


15600 REMEEEEREREREETE EEE EEE EEE REED E 
15601 FEM RELATIVE COP 
15602 REMEHHH44 MEP ERETTA 
15616 GOSUE 111600 

156268 IF Ha127 THEH H = H-@ié 

15639 H = H+AI 

15646 GOSUE 116006 

15659 01$£ = O1$+"£"+H£ 

15660 RETURH 


Questo modulo si occupa dell’indirizzamento relativo e trasforma il byte che se- 
gue il codice operativo in un numero nell’intervallo —128/+127. 


TAVOLA DI CONTROLLO 


15602 123 


15600 123 15601 139 
15610 160 15620 239 15630 177 
15640 159 156509 99 15660 142 
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MODULO 2.6 


SI66 
15470 
15320 
15590 
15400 
LI41H 
+ n" r, 4 n 
15424 
+ " % La n 
15450 
13446 


Questa semplice sezione di frasi IF regola il formato delle istruzioni in linguag- 
gio assembler a seconda dei diversi modi di indirizzamento. Il modo migliore di ca- 
pire questa sezione è quello di confrontare ciò che essa fa all’operando sulla base 


FEM ADI OPEEAHD IH OP TO 01€ 
CH OP+1 GOTO 15456, 15500, 15550, 156 


IF O0FPS5 AND OPZIO THEH 01$£ = 01$+" 


A GOSUE 11100 
A 018 = O18+"*" : T$ = H$ 


IF0F9 THEH 15590 
GOSUE 11100 
O1E = C15+H$ 
01$£ = 01$+T£ 


IF0P=9 OR O0P=5S THEH C1E = 01$+"0" 
IF OP-IMTX0P22)#5=1 THEH 01£ = CI1£ 
IFOP-IHTC/0P31*F=2 THEH Di£ = 01 
IF O0P=F THEN 018 = D1g+"%" 

PETUEH 


dei valori di OP presentati nella tabella più sopra. 


TAVOLA DI CONTROLLO 


pd papera 
nen 


ER ENEN GL 


Ea Dn 


fa da Li LIU 
Lago 


123 5301 158 15302 123 
116 15330 10 15240 160 
156 SIA SI 15379 160 
sa 15390 92 15400 220 
207 15420 209 15450 107 
142 


SEZIONE 3: disassemblaggio della memoria 


Abbiamo introdotto le sezioni del programma che permettono di tradurre da lin- 
guaggio macchina in linguaggio assemblatore. Resta ora da aggiungere l’insieme 
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dei moduli che permettono al programma di prelevare il contenuto di una specifica 
area di memoria del 64 in modo che le istruzioni in esse contenute in linguaggio 
macchina possano essere disassemblate e visualizzate sullo schermo. 


MODULO 2.7 


SFR REMEREEZE RE AREE EEE ERI EEE: 
321 REM DISSSSEMELE IMSTEUCTIOH 
157 2 REMEEEEEEEE RE RE EEE ETA 
ISPIO Des = "" 
1515 GOSUE 11166 : H 
1520 IF H3255 THEH H 
ci = SC CMIDE (TASCA 4:H 512 
: MIDE CTASC2).TAG+1, qI+" ii 


OPO= MSC CMIDE £TAECI 1 sd IMTE HITS 


iu 


i di 


4A0IF €HO AND 13 1 THEH OF = DCFPS16 
S6 OP = OP AHI 15 
BETUEH 


TAVOLA DI CONTROLLO 


15 CAR 123 1501 93 
sti 219 219 15F15 119 

LOFso 131 LOCoa 145 

iarri 146 FOA LEG 


Questo modulo costruisce l’istruzione in linguaggio assemblatore sulla base delle 
informazioni ricavate dalla memoria. 


Commento 


15715-15720: ottenuto il byte del codice operativo, il suo valore viene posto nella 
variabile ‘H°?. 

15730: il codice operativo viene usato per ottenere un puntatore da TA $(0) che in- 
dicherà la posizione in TA$(2) del formato a tre lettere in linguaggio assemblatore 
di quel codice. 
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15750: viene aggiunto uno spazio dopo il codice operativo per uniformarlo al for- 
mato standard del linguaggio assembler. 

15760-15780: viene ricavato dalla tabella TA$(I) il modo di indirizzamento asso- 
ciato al codice operativo. 


MODULO 2.8 

15600 REMEEEEEEEE RE PARE EEE ETE ERE EER 
Li REM DISASSEMELE MEMORY AREA 

1! & REMESEEEEEEIE RE ERRE EEE RE E RE RE 
155 GOSUE 12650 

ti A PRINT "[CLH]" : FORT = 1 T0 SO 
15525 H = AD! GOSUE 1166060 : PRIHT HE TH 
ES) è 

15535 GOSUE 1S5F060 i GOSUE 15300 

1525509 PRINT D2£ TRE143 01€ 

15560 HEZXT I 

15965 PRIMT 

15570 GOSUE 11550 

15289 IF CO THEN 15820 

158904 RETLIRH 


TAVOLA DI CONTROLLO 


123 15801 13 
165 15520 93 
sa 15850 115 
153 1SS70 172 
142 


Questo è il modulo che controlla il formato delle istruzioni in linguaggio assem- 
blatore ottenute dai moduli precedenti. Per una spiegazione delle varie chiamate 
delle subroutine, si veda in Appendice la Tabella delle funzioni delle subroutine. 


Sommario 


Anche se state lavorando su questo libro con un buon testo base sul 6502/6510 
vale la pena, a questo punto, di passare un po’ di tempo giocando col vostro assem- 
bler e monitor. Provate a disassemblare alcune delle routine della ROM del 64 e 
cercate di capire come funzionano. Alcuni indirizzi interessanti per iniziare a disas- 
semblare sono elencati sotto, con le funzioni delle routine che vi si trovano. 
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Fate attenzione comunque che un disassembler è utile solo se viene fornita una 
posizione di partenza corretta in memoria. Se iniziate a disassemblare la memoria 
in un punto a metà di un’istruzione macchina, i primi byte almeno del listing disas- 
semblato saranno privi di senso, dal momento che parti di operandi saranno state 
tradotte come codici operativi. Alla fine, dopo aver saltato un numero di istruzioni 
apparentemente errate o addirittura insensate, il disassembler incontrerà istruzioni 
corrette. Da qui in avanti verrà disturbato solo dalla presenza in memoria di tabel- 
le, che tenterà nuovamente di tradurre come se si trattasse di istruzioni in linguag- 
gio macchina. Quando vi imbattete in tali problemi l’unica soluzione è quella di 
spostare l’indirizzo iniziale finchè non sia terminata la tabella e vengano trovate i- 
struzioni sensate all’inizio del listing disassemblato. 

Qui sotto c’è un esempio di disassemblaggio di un’area dell’interprete del 64 ini- 
ziante all’indirizzo di una routine la cui funzione è quella di accettare in ingresso 
una nuova linea BASIC usando varie subroutine del monitor e del ‘kernal’ del 64. 


FIRE 


1 
"LI 


DE] 
LI 


Raf 
B4A7 
RARI 
BARE 
FF 


COHNTIMUE € ea 
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CAPITOLO 3 
FILE EDITOR MASTERCODE 


Prima di procedere con la parte principale del programma assemblatore esami- 
neremo il file editor, che permette di immettere in forma opportuna i programmi in 
linguaggio macchina e di editarli convenientemente. 

Discutendo del disassembler abbiamo già notato il formato di alcune singole i- 
struzioni che verranno usate nei programmi in linguaggio assemblatore. Se avete u- 
sato il disassembler per tradurre parte della ROM del 64, avrete anche visto in qua- 
le forma i programmi in linguaggio assemblatore vengono usualmente presentati, 
che consiste di tre tipi d’informazione per ciascuna istruzione: 


1) l'indirizzo di memoria dove l’istruzione si trova 
2) il contenuto, in esadecimale, dei byte che la compongono 


3) la forma in linguaggio assemblatore dell’istruzione 


Quando si introduce un programma in linguaggio assemblatore per mezzo di un 
assembler, sono necessarie le sole istruzioni in linguaggio assemblatore. Ci sono 
però alcuni problemi connessi alla semplice introduzione di una lunga lista di istru- 
zioni in linguaggio assemblatore. Ad esempio cosa succede se dopo aver immesso 
un lungo programma in linguaggio assemblatore ci accorgiamo che dobbiamo inse- 
rire alcune istruzioni nel mezzo di esso oppure che dobbiamo cancellarne alcune? 
Dobbiamo ripetere tutto il programma correttamente? Ovviamente l’ideale sarebbe 
qualcosa del tipo offerto dall’interprete BASIC del 64 - linee numerate che vengono 
automaticamente cancellate o inserite al posto giusto, con la possibilità di modifi- 
care linee dovunque nel programma. È compito del file editor offrire queste possibi- 
lità, benché la sezione di programma presentata qui vada oltre, permettendo anche 
di renumerare il programma e di salvare (o caricare) il file in linguaggio assembla- 
tore prima che l’assemblatore proceda effettivamente ad elaborarlo e tradurlo in 
codice macchina. 
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Va sottolineato il fatto che il file editor non è una parte dell’assemblatore pro- 
priamente detto poiché non si occupa del tipo di materiale che viene immesso, ma 
permette semplicemente di inserire in un file delle linee numerate. Nulla viene con- 
trollato o elaborato finché l’assemblatore vero e proprio non viene attivato. 


SEZIONE 1: inizializz azioni 


MODULO 3.1 


24901 FEM FILE EDITOR MEHLI 


24820 PRINT "[CLHICGRN] ------------ FIL 
E-ERLIOR enna CELUICCIMI" 

245235 PRINT" fi E#IT FROM FILE EDI 
TOR" 

24540 PRINT" 13 IMPUT LIMECSOI" 
242509 FRINT " 23 LIST LIMES; 

24260 PRINT" 3 DELETE LINECSì" 
24870 FRIMNT " 43 MEHUMBER FILE" 
24289 FRINT " 53 IMITIALISE FILE" 
24690 FRINT " 63 LORI FILE" 

24900 PRINT" 73 SAVE FILE" 

24916 PRINT" 52 ADI MACHINE CODE T 
O FILE” 

24915 PRINT" 93 CHAHGE DEVICE HUME 
ER[COWI [COW] [CIMI [COMI CCIII" 

24920 IMPLT O " COMMANDO £ 6390100"; (00 


24940 IF CO=M THEM RETURH 
24956 IF co» 6 THEN ON CO GOSUE 24600, 244 
dA, 24500, 2 n AU 
24960 IF C038 THEN Ci P0-S GOSUIE 25500 
24970 GOTO 24200 


Un modulo completamente dedicato al menu. 
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TAVOLA DI CONTROLLO 


D4S00 123 24501 1 123 
24620 125 35 235 173 
24250 96 Z4REA 216 218 
24850 102 24096 156 172 
24910 920 24915 245 152 
24940 145 24950 30 252 


S4aFa 167 


MODULO 3.2 


IDG REMEREEESESEEE EEE AEREE E48448444 
24301 REM INITIALISE FILE 

24302 REMERKERERE RE E REZZA RAEE 
24310 FIRE = "" : Eg=o"" : FORX= 6 TO 
254 : E$ = E$+CHRf (%) : MEXT : RETURN 


Questo modulo predispone le variabili necessarie per trattare un nuovo file — ri- 
chiamando questa opzione con un file già in memoria si provocherà la perdita di 
questo file. Le due principali variabili sono PTRÎ$, che indicherà la posizione corret- 
ta degli elementi del file, ed E$, che terrà conto della posizione degli spazi per nuovi 
inserimenti. L’uso di PTR$ verrà descritto nel modulo 6. 


TAVOLA DI CONTROLLO 


24300 123 243501 215 24302 123 


24310 217 


MODULO 3.2A 


199960 DIM FI$C(254) © GOSUE 243500 


Questo modulo fa parte in effetti della routine di inizializzazione principale per le 
tabelle del disassembler. La sua funzione è quella di predisporre la matrice del file 


37 


principale (FI$) quando il programma viene eseguito per la prima volta. Una volta 
che il programma è partito, la matrice viene reinizializzata richiamando il modulo 
precedente. 


TAVOLA DI CONTROLLO 


SEZIONE 2: Immissione di linee 


MODULO 3.3 

CAEOO REMISSRRER ARE RAA RA AREA 

24601 REM INPUT LIMECSI 

Z4ED2 REMPSIERERER ERE AEREA RARE 

24616 PRINT "CCLHI" 

24620 INS = "" : IMPUT IM$ ©: GOSUE 240600 
; IF LM=-65536 THEN 24665 

24650 GOSUB 2390 IF LENCINS>=M THEN 2 

4650 

24660 GOSUE 23100 : IF MOT EFR THEH 2462 

[ta] 


24665 RETURN 

24680 GOSUE 22626 IF HOT ERRO THEH GOSl 
E 23300 

24690 GOT0 Z4Ezo 


Questo è il modulo che, all’immissione di una linea, attribuisce i compiti necessa- 
ri alle varie routine del file editor. Oltre a distribuire i compiti ad altri moduli, la sua 
unica funzione è quella di permettere l’immissione della linea nella forma di IN$ e 
di determinare se viene inserito un numero di linea senza alcuna linea, cioè se si 
vuole eseguire una cancellazione. 


TAVOLA DI CONTROLLO 


C4EOO 1253 24601 42 24602 123 
24610 144 24620 251 24650 108 
P4GGO 94 24663 142 24620 6 
24690 167 
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MODULO 3.4 


CIAOO REMEEEIEE RIE EEE EEE RAEE 
24001 FEM GET LIME HUMEER 

24IONZ REMESEEEETEEREE TI DEDE EEE RA: 
24929 IF LENIN$=9 DE 
CINE, 133>"9" THEN 24090 
24990 FORT = 1 TO LEMSINS: 

24040 IF MID$ £IM$,T,1€="3" AND MIDE «I 
N$.T,103="0" THEN MHESTOT 

24080 LN = VALCLEFTE CIME. T-150 © IME = 
MID$ CIMHSE.T1 

24999 FETUEN 


IH$c"G" OF LEFT 


Ottenuto un input nella forma IN$, si ricava un numero di linea dall’inizio della 
stringa. La stringa viene esaminata carattere per carattere per trovare il primo di 
essi al di fuori dell’intervallo 0-9, quindi si calcola il VAL della stringa fino a quel 
punto. Le stringhe che non iniziano con un numero di linea provocano un’attribu- 
zione del valore —65536 al numero stesso (LN), segnalando così l’errore, in caso 
contrario il numero di linea viene memorizzato in LN ed i caratteri che lo rappre- 
sentano vengono sottratti alla stringa originaria. 


TAVOLA DI CONTROLLO 


S4OGO 12 SAGGI 192 
24010 64 ZAAZA SS 
24049 150 S4660 79 
MODULO 3.5 


SLI REM E EREDE EEE ERI ERETTE REA 
REM REMOVE LEADING SFACES 

2 REMEEEEREEE EEE ETE RE IRE 
16 FORT = 1 TO LENCIN$Ei 

4IF O MIDE €IH£,T.13=" " THEN NEXT T 
IH$ = MIDS «IME.T3 ©: RETURN 
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La stringa IN$, privata del suo numero di linea, può iniziare con uno o più 
spazi — questo modulo li rimuove. 


TAVOLA DI CONTROLLO 


123 23901 112 
cus CIS Si 
MODULO 3.6 


REM FILE EDITOR 
A MEM FILE EDITOR 
REM FIND LIME HUMBER IN “LN IN FI 


LEHFTRE{+1 : T2= +1 

T T-10: IF TA=68 THEN GOTO 22020 
TI = ASC «MID “PTR£,T,153) 

Te = ASC «MIDE «FISST1)3.1,151+256% 
“MID €“FISCT13,.2,151 

PAGIF T2%LH THEN 226040 

150 ERRE = MOTCTZ=LN} : IF ERR THENT = 


ocra 
- 


a 


mam 


RETURN 


Prima di procedere col modulo che inserisce effettivamente una linea nel file, 
dobbiamo occuparci di questo, la cui funzione è determinare la posizione corretta 
per la nuova linea (ammesso che essa abbia un numero di linea valido). Esaminan- 
do il modulo comprenderemo meglio l’uso di PTRS. 


Commento 


23030: nella ricerca della posizione corretta, in cui inserire una linea faremo uso 
della stringa che abbiamo chiamato PTR$ abbreviazione di ‘pointer string’ (stringa 
puntatore). Una stringa puntatore è un metodo standard di superare i problemi di 
inserimento di nuove linee in matrici a più righe. Non che la cosa sia difficile, ma 
semplicemente l’inserimento di una nuova linea all’inizio di quella che potenzial- 
mente potrebbe essere una matrice anche di 250 righe provoca lo scorrimento di 
tutte le righe presenti, un compito che può consumare tempo e creare anche proble- 
mi di riorganizzazione rallentando ulteriormente le cose. Usando una stringa pun- 
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tatore si può superare tutto questo, dal momento che il contenuto della matrice non 
viene mai fatto scorrere. Tutte le manipolazioni vengono eseguite su un’unica strin- 
ga. Invece di cercare la posizione corretta nella matrice e poi di far scorrere tutto 
per fare spazio alla nuova linea, ciò che faremo è trovare quaie dovrebbe essere la 
posizione corretta (in base al numero di linea), piazzare la linea da inserire nel pri- 
mo spazio libero che si trovi e quindi indicarne la posizione effettiva al punto giusto 
della stringa puntatore. 

In questo modo la stringa puntatore potrebbe contenere una serie di byte con i 
valori 34,76,233,176... Ciò che questo significherebbe è che la vera prima linea del- 
la lista si trova nella posizione 34, la seconda nella posizione 76, la terza nella posi- 
zione 233 e così via. Per accedere in ordine alla matrice di linee dobbiamo prima e- 
saminare PTR$, ricavarne la posizione della prima linea, quindi esaminare il secon- 
do carattere di PTR$ per trovare la posizione della seconda. Dal momento che ab- 
biamo accettato un limite arbitrario di 255 linee per ogni file, tutti i puntatori posso- 
no venir rappresentati sotto forma di un singolo carattere in PTR$ — i caratteri 
hanno un valore ASCII compreso fra 0 e 255. Per eseguire un inserimento, sarà ne- 
cessario soltanto suddividere PTR$ in due parti e piazzarvi nel mezzo un nuovo in- 
dicatore con un risparmio di tempo considerevole. In questa linea in particolare la 
variabile principale di ricerca (T) è inizializzata al valore LEN(PTR$) +1, in modo 
che la ricerca inizi al termine di PTRS$. 


23050: il valore del carattere T in PTR$ è la posizione di quella che dovrebbe esse- 
re la linea T nella matrice (non la linea col numero di linea T, ma quella nella posi- 
zione T se contassimo dall’inizio del file). 


23060: ottiene il numero di linea della linea memorizzata in FI$ alla posizione TI. 


23070: continua la ricerca finché viene trovato un numero di linea maggiore di 
quello della linea da inserire (LN). 


23080: viene posta uguale a —1 la variabile ERR se il numero di linea da inserire 


non è uguale a quello di una linea già presente nel file. Questo permette al modulo 
successivo di sapere se una linea viene inserita o riscritta. 


TAVOLA DI CONTROLLO 


ZIOLO 152 GO 123 
23040 17 6 160 
Sora 92 A 16 
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MODULO 3.7 


REMEESEREEE EEE EEE TIE EEA AEREE 

FEM ADD LINE TO FILE 

12 REMESSEKA4EE EREDE EEE 

IF LH: HP ULMHESSSAS THEN 25215 

GOSUE 20020 

HOT ERR THEN T1 = HASC “MID “FT 
GOTO 23156 

E#="" THEH EER = TRUE © GOTO 23 


dl = ASC CES): E$ = MIN$ <E$,2) 
23150 T2 = INTCLN/256) 
3160 FISCTI) = CHR$ (LN-T2#2561+CHR8 <T 


MOT ERE THEH sH220 

un o TIE = ULI 

#1 THEH T£ = LEFT «“FTRE,.T-10 
«*LENCPTRS THEN T1£ = MINE «FP 


(E = TE+CHRE “TL3+T1£ 
FALSE 


Questo è il modulo che esegue l’effettivo inserimento della linea nel file. 


Commento 


23105: usando due byte, 0-65535 è il massimo intervallo possibile per numeri di li- 


nea. 


23120: se il modulo precedente restituisce un errore, significa che si sta immettendo 
una linea con un nuovo numero. Se non c’è errore la linea da immettere è semplice- 
mente una riscrittura di una linea esistente e PTR$ non ha bisogno di essere modi- 


ficato. 


23130: per accelerare ancora il processo di inserimento, viene utilizzata una secon- 
da stringa (E$) per registrare tutti gli spazi esistenti nel file. Invece di ricercare il 
primo spazio libero, la linea verrà inserita nella posizione indicata dal primo carat- 
tere in E$-carattere che verrà eliminato finchè non tornerà libera la posizione corri- 


spondente. 
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23150-23160: vengono creati i byte dei numeri di linea a partire da LN e la nuo- 
va linea viene inserita. Notate che avendo messo il byte ‘alto’ nella variabile 
T2 (=LN/256), non c’è bisogno di porre un’altra variabile uguale a 
LN-256*INT(LN/256). Mettendo semplicemente LN in forma ASCII si perderà 
tutto ciò che è superiore a 255, come se si fosse eseguito un AND fra LN e 255. 


23170-23210: se stiamo trattando un nuovo numero di linea, allora si deve aggiun- 
gere un carattere a PTR$. La posizione del carattere è indicata da T ed è sufficien- 
te prendere LEFT$ (PTR$, T--1) e MID$(PTR$,T) per inserire fra queste il carat- 
tere opportuno. 


TAVOLA DI CONTROLLO 


195 


14 


REM DELETE LIME POINMTED AT E T 
REMERIHHAREAIAA RARE REA 
OTE = vio Tiga 

320 IF T>1 THEN T& = LEFT$ (PTRS.T-1) 
23330 IF TCLEN(PTRS> THEN T1£ = MID$ «PT 
R$. T+1) 

233409 E$ = E#+MIN$ (PTRS.T.1) 

23350 PIR$ = T#+T1£ 

23369 RETURN 


Potrebbe sembrare strano descrivere questo modulo nel paragrafo dedicato al- 
l'inserimento delle linee, dal momento che il suo scopo è quello di eliminarle. La ra- 
gione per cui ne parliamo qui è che, inserendo nuove linee, ne viene immessa una 
composta dal solo numero di linea, la riga corrispondente viene cancellata, analo- 
gamente a quanto succede in BASIC. Il modulo è perciò chiamato dal modulo di 
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controllo principale per l’inserimento. La procedura seguita è l’immagine speculare 
di quella usata nell’inserimento, con la rimozione di un carattere puntatore da 
PTR£$ e la registrazione della posizione della linea come spazio libero in E$. Notate 
che non c’è bisogno di eliminare fisicamente il contenuto della linea che permane, 
ma esso non verrà più riconosciuto dal file editor e verrà riscritto non appena si in- 
serirà una nuova linea. 


TAVOLA DI CONTROLLO 


SEZIONE 3: listing e cancellazione 
MODULO 3.9 


24200 REMESAIAAAAAAAAAAAAAAIAAAAAAAAAAA E 
24201 REM FIRST AND LAST LINES 
24202 REMIENAIAAAAA ANA AAAAA AAA AAA AAA ANA 


24205 IN$ = "" : INPUT "FIRST - LAST LIN 
ES! "; IN$ 

24219 SL = A: FL = 65535 : T3 = @ : ERR 
= FALSE 


24220 IF LENCIN$)=A THEN 24295 

242304 GOSLB 24000 

24249 IF LH?>=@ THEN SL = LN : GOTO 24260 
24259 IF LH>-65536 THEN FL = LN : GOTO 
24295 

24260 GOSLUB 23900 : IF LENCIN$S>=0 THEN F 
L= SU: GOT0 24295 


24270 I1H$ = MIDE CIN$.2) © GOSSIP 2a4nA 
24299 IF LENCIN$;>A ii GOSUB 24000 F 
L= LN 


24295 ERR = SL“9 OR SL365535 OR FLZ9 OR 
FL>65925 QR EER: RETURH 


Questo modulo è usato nel listing e nella cancellazione di blocchi per ottenere in 
ingresso coppie di numeri di linea nella forma ‘100-300°. 
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Commento 


24210-24220: linea iniziale (SL) e linea finale (FL) vengono inizializzate con i valo- 
ri estremi permessi. Se l’utente preme semplicemente RETURN all’apparire del 
‘prompt’, l’intero file verrà listato dall’inizio alla fine. 


24230-24250: il primo numero di linea viene ricavato dalla subroutine in linea 
24000. Se è maggiore di zero SL viene posto uguale ad esso. Se l’ingresso fosse del 
tipo —300° questo verrebbe restituito come meno 300. In questo caso SL resta a 
zero, ma FL verrà posto uguale a 300 ed il file verrà listato fino alla linea 300. 


24260: tutti gli spazi iniziali vengono eliminati da ciò che resta in IN$ dopo la ri- 
mozione del primo numero. Se non è rimasto nulla allora FL è posto uguale ad SL 


e viene listata una sola linea. 


24270-24290: IN$ viene privata del ‘—’ precedente il secondo numero, tutti gli spa- 
zi precedenti vengono rimossi ed il secondo valore viene ottenuto. 


TAVOLA DI CONTROLLO 


MODULO 3.10 


ZIO REMEEKEEETEZE RIETI EEE 
23481 FEM LIST LIMES FPOINTED AT EYT 
ZI4GHS REMEEKEREETE EATER RIAD 
23416 PRINT ASC (MIDE €FISCTO.1:110+256% 
ASC €“MINE €FI£CTI.2,133 TABECGI | 

23429 FRIHT MIDE ©“FISCTO. SI 

23439 FETUEH 


Questo modulo stampa una linea la cui posizione è indicata dalla variabile T. Il 
numero di linea è ricavato dai primi due caratteri della linea stessa, quindi viene vi- 
sualizzato il resto della linea. 
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TAVOLA DI CONTROLLO 


ZI4OO 123 
ZGA1O 175 


MODULO 3.11 


REMEREEEERE ERE EEE TARARE 
41 REM START AND FINISH POINTE 
A REMEEEELE RETE RETE EEA AAA 
LH = SL o GOSUE 23620 
SP_=T 


SA LH FIGO GOSIUE S3AZIA 
A FP=T 

IF ERRE THEH FF = FF-1 

IF FPS=SLEHIPTR£: THEH FP_= LEMEFTRE 


23560 RETUFH 


Usando i numeri delle linee iniziali e finali questo modulo estrae da PTR$ i pun- 
tatori alla prima e all’ultima linea da listare e li pone in SP ed FP. 


TAVOLA DI CONTROLLO 


MODULO 3.12 


CISA REMEEEEETEEEEE ZERI RI EREDITIERA 
24401 REM LIST LIMES 

24402 REMEREBERE EE EEE ETTARI 44: 
24416 GOSUB 24266: IF EER THEH 24450 
244260 PRIHT "[CLH]"  GOSUE 22500: IF F 
FASFPOR FFP=O THEH 24460 
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24430 FOR TI = SP_TO FP: T = ASC CMIDE 
€PTRS.T1.10% © GOSUE 23400 : MEXT : PRIM 
7 

24455 IF PEEK(1523=9 THEN GET T& : IF T$ 
="" THEM 24455 

24460 RETURH 


Usando i puntatori iniziale e finale determinati dal modulo precedente, questo 
modulo richiama il modulo di visualizzazione per trasferire le linee sullo schermo. 
La strana linea 24445 controlla se le linee vengono al momento listate su un dispo- 
sitivo come il registratore a cassette o la stampante. In caso contrario, il listing 
verrà visualizzato su schermo finché non verrà premuto un tasto. 


TAVOLA DI CONTROLLO 


24400 1230 24401 1340 24402 123 
24410 154, 24420 24l 24430 126 
24455 214 S4dea 142 


MODULO 3.13 


LPD FRE DIE 6 E E 6 E EHEH HEHE ATE 
24501 REM DELETE LINECS) 

Z4SO2 REMERAEERAAAA AE EAAAATAAAARAMAAAAA 
245109 GOSUE 24204 : IF ERR THEN 24469 
24529 GOSUE 22590 : IF FP<SP THEN 24560 
24539 T = SP: FOR T1 = SP TOFP:: GOSUE 
23300 : NEXT 

24569 RETURN 


Questo è il modulo di cancellazione di un blocco. Viene incluso ora poiché la sua 
unica funzione è quella di richiamare i moduli precedentemente introdotti, il più vo- 
luminoso dei quali è la routine che trova la prima e l’ultima linea. Invece di listare le 
linee specificate il modulo di cancellazione di una linea viene richiamato a turno per 
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ciascuna linea. Notate che dal momento che PTR$ viene accorciato ad ogni can- 
cellazione, il carattere cancellato ad ogni iterazione del ciclo si trova sempre nella 
stessa posizione. 


TAVOLA DI CONTROLLO 
245060 123 4ISO01 Fa 24 
EI 


24510 154 C4SZA 160 ni 
24960 142 


SEZIONE 4: caricamento e salvataggio 


MODULO 3.14 

CIPRO REMEEKEEETTI EIA AAA 
23701 FEM SAVE FILE TO DEVICE 

ZICOZ REMESDERE TEMEVA ERA 
cordo GOSUE 11254 

316 IF DEYV=S THEH IM$ = IM$+".5,U" 
SSf15 T$£ = "NH" (o IF DEVS=S THEH INPUT "04 
ERHEITE E#ISTING FILE © WW#Ho di" T£ 
ZIF16 IF T$="" THEH IN$ = "@0:"+IN$ 

2 A CPENZ, DEV. 2 IN$ | CMI 2 


23 fl 


SL = Bd (FL = 69346 

9A GOISUE 244260: PRINT#Z. "ENI!" 
co ced PRINT8S | CLOSE 2 

ei FETUEH 


Questo modulo permette di salvare su disco o nastro un file che avete creato op- 
pure di inviarlo in uscita alla stampante. 


Commento 


23705: routine del monitor che richiede il nome del file. 

23710-23716: queste linee sono incluse a vantaggio di coloro che utilizzano l’unità 
a disco per memorizzare. L’effetto è di permettere all’utente di scrivere su di un file 
già esistente sul drive zero il file sequenziale con il contenuto di FI$. Le linee sono 
eseguite solo se DEV è posta uguale ad 8 (drive del disco). 
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23720-23760: viene aperto un file sul dispositivo specificato e l’istruzione CMD2 
precisa che tutti gli output successivi saranno inviati a quel dispositivo. Non resta 
altro che usare le normali routine di listing per stampare tutte le linee del file, con- 
cluderle con ‘END’ come sigillo e infine chiudere il file. 


TAVOLA DI CONTROLLO 


MODULO 3.15 


FREMESEKEEEREE EEE EEE 44 

FEM LOAD FILE FROM DEVICE 

2 REMBEEERIE EEE 

A GOSUE 11256 

S IF DEV=S THEH IH$ = IM$#+".50.F" 

A OPENZ, DEL A, IME 

25 IMPUT#2 , IM$£ o IF ST THEH GOTC 20 


REAL 


IF IN&>"ENI" THEM 
GOSUE 20150 


1 
ESG CLOSE E 
A66A RETURN 


FER LAS Di r 4, 


Immagine speculare del modulo precedente. Notate che nel ricaricare un file da 
nastro o disco devono venir usate tutte le normali routine di ingresso. Ciò perché le 
linee sono state listate per esteso con i loro numeri di linea e non nella forma a due 
byte dei numeri di linea che è mantenuta correntemente in FI$. Il sistema di salva- 
taggio/caricamento su cassetta ha difficoltà nel salvare i caratteri ASCII non stam- 
pabili e il semplice salvataggio del contenuto di FI$ provocherebbe l’alterazione di 
alcuni numeri di linea durante il ricaricamento. 


TAVOLA DI CONTROLLO 


dl SI 
; 174 


215 


49 


MODULO 3.16 


1 FEM CHBMGE DEVICE NUMEER 

i REMEEEEEEERERT EEE EEE EE EEE E ERE 
PRINT SPIA 1590 DEN 

IHPUT "LE "UPIMEH DEVIC E HUMEER "DE 


FER RI mme AOC 
Facv RU SCE LA 


ZH FETUEN 


Lo scopo di questo modulo è quello di permettere un output su cassetta, disco 0 
stampante. Notate che un tentativo di eseguire un output o un input su di un dispo- 
sitivo non presente, o di eseguire un input da un dispositivo che non è in grado di 
farlo, come ad esempio la stampante, può avere il risultato di bloccare il program- 
ma. I dati non andranno persi se avrete iniziato l’esecuzione del programma con un 
GOTO 10000 invece che con una RUN. Prima di fare ciò è utile accertarsi che il fi- 
le 2 sia chiuso con l’istruzione PRINT 2: CLOSE 2 se stavate salvando al momen- 
to dell’interruzione del programma oppure con CLOSE? se stavate caricando. 
Questo eviterà la possibilità di un errore del tipo “FILE ALREADY OPEN” (file 
già aperto). 


TAVOLA DI CONTROLLO 


SEZIONE 5: renumerazione 


MODULO 3.17 


24 FOO FEMEREREE IEEE ZE RAEE RED EEE 
24701 EEM FEMUMEEER FILE IH STEPS OF 16 
2 REMEREEER E ERE REEZZEEEERE EREDE 

z47 16 LH = 16: EKEE = FAL 
2428 IF LEMCPTRENCI THEH è cina 
24730 FORT = 1 T0 LEMCETRE1 
253 TI = ASC «MIDS ©FTRE.T.100 


2440 FISCT1O3 = CHESS CLH-INTALHSZ 551256 
2+4CHR$ CLNSZ560+MINE €FIECT1I3 301 
24796 LH = LH+16 i HEET 

FSB RETUEH 


Forse il modulo non merita una sezione particolare, ma esegue operazioni indi- 
pendenti da quanto visto finora. Il suo scopo è quello di renumerare il vostro file 
con passo 10. Ciò è realizzato privando ogni elemento introdotto, nel file dei suoi 
primi due caratteri e quindi ricreandoli a partire da LN, che viene incrementato di 
10 ad ogni nuova linea. 


TAVOLA DI CONTROLLO 


24700 123 24; 
24710 173 247 
24735 1600 24; 
24720 142 


MODULO 3.18 


O REMERERRIA FIAS EA RRE REATI ATARI ERA 
11 REM ADD TO FILE FROM 


i 


GOS UE 


DE KW = AD TO ER STEP 15 

$ =" BYT ": [N= SL: SL = SL+ 
ATO 14 ci D2sgo so "" 

A: TIME = INS+E"+HE 

I ADESER THEM INS = INF 


HEAT «Yo RETUEH 


Dobbiamo ammettere che questo modulo è frutto di un ripensamento. La sua ri- 
levanza non sarà del tutto chiara finché non avrete a disposizione l’assemblatore, 
ma ciò che fa è permettervi di specificare un’area di memoria e piazzarla in un file 
di programma in linguaggio assemblatore nella forma di ‘direttive di byte’ — il con- 
tenuto di ciascuna locazione di memoria è specificato nel file assemblatore. Non 


SI 


viene eseguita alcuna modifica automatica sulle istruzioni che accedono ad indirizzi 
nell’area da cui il codice è stato originariamente spostato. Tali istruzioni si riferi- 
ranno ancora all’area originale di memoria. 


TAVOLA DI CONTROLLO 


Sommario 


Ora che avete a disposizione il file editor è bene che ci giochiate un po’ prima di 
procedere a immettere l’assemblatore. Questo vi aiuterà a evitare la seccatura di 
immettere un lungo file in linguaggio assemblatore e scoprire di averlo rovinato a 
causa di un uso sbagliato del file editor. Potete, se lo volete, immettere uno o due 
dei programmi in linguaggio assemblatore che si trovano più oltre in questo libro, 
salvarli su nastro o disco e poi ricaricarli per controllare se conoscete esattamente 
la procedura. 
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CAPITOLO 4 
ASSEMBLER MASTERCODE 


Dopo aver completato il file editor possiamo iniziare il lavoro di immissione del- 
la parte più importante e complessa del programma Mastercode, l’assembler. Il suo 
scopo è quello di permettersi di introdurre programmi in linguaggio assemblatore e 
di fornirvi strumenti per facilitare la programmazione, oltre a permettervi di tradur- 
re automaticamente quei programmi in linguaggio macchina. Il prezzo pagato per 
la flessibilità e la potenza di questa parte del programma è, la sua immensa com- 
plessità. Sarà un lavoro lungo trascriverlo tutto e senza dubbio ci saranno molti er- 
rori in questa fase, ragion per cui dovrete affidarvi alle tavole di controllo per esa- 
minare il risultato. Al termine di questo lavoro. avrete lo stesso programma che ab- 
biamo utilizzato noi per sviluppare tutte le routine in linguaggio macchina contenu- 
te nel testo. Il programma funziona e questo basta a giustificare lo sforzo che ri- 
chiede per copiarlo. 


SEZIONE 1: inizializzazione 
MODULO 4.1 


19046 TA$(ZI = TRE(21+"EVTURDDEVENDORGPE 
TStYM " 

19047 TE 
Rienese” 


19045 T$ = T$+"ESCIECCCCECASS4 DEEEECo4co 


Hi 


"bl 10696E0F 9243010 BOGSaT 


ra 
MD 
= 
La 
10 
J 
A 
It 


: TE+ "IRE IISRSCE El AGAAOGHE 


al 
19050 T£ = TE+"SESCAAASENSASRSE" 
19651 GUSUE 12200: TA&3l = T1lE 


53 


g 


2 T& = "EF11FFFFEFGOOAFFFF1DGEFFF 


Beni 
i 


Di Gn) hd a dir 


Mr iN 


Ti 00m i 


3 T& = T8+"FF15FFFEFFFFFFFFEFOIFFFFF 
4 T& = T&+"EF2IFFFF2C293EFFEF3DZEFFF 
S_T& = T&+"FF3SFFFFFFFFFFFFEF31FFFFF 
6 T$ = T$+"FFS1FFFFFF49SEFFFFSIMEFFE 
T& = T&+"FFSSFFFFFFFFFFEFFF4A1FFFFF 
SL; = T$+"FF6IFFFFFF&S7EFFFF7FIGEFFF 


GOSUE 12500 : TA&(4) = TI 
T&£ = "FFPSFFEFFFFFFFFFFF71FFFFF 


Ti AGO AO BOI SR Dio 


nemn-QMen-eneomn-m- 
2 è 


T8 = T&+"FF91FFFF943D96FFFFFFFFFFS 
2 T£ = T&+"FF9SFFFFFFFFFFEFFF81FFFFF 


fi TE = TE+"ECEIEEFFRBRSASFFFFEDFFAFA 


Ps D Di ida 


LI 
A 
i DI 
Rae ei 
= cri 
dn 
# co 
H 


: T&+"FFESFFFEFFFFFFFFFFR1FFFFE 


Po 0 TI DO DN OOo 


è ao Lia TNoe&-DNEeor 


= Tk+"FFINFFFFCOCONEFFEFODIFFFFO 
a Tk+"FFDSFFFFEFFFEFFAEFEFFELIFFFFE 


: 12200: TASC4) = TA&CdI+T1$ 
"FFF1IFFFFERESFEFFFFFIFFFFE 


: T&+“EFFSFFFEFFFFEFFFFFE1FFEFF 


GOSUE 12200 © TA£C4) = TAS(4l+T1$ 
deg SM = SG = O: DIM STARELESCSMI 
161 DIM ERR£C1 
103 ERR&(1) = 


UD 


FIMGLE EYTE OUT OF EAHG 


13004 ERRECZOI MINUELE EYTE CUT OF EAHG 


il 
Hi 


19165 EEREC 53 = "INNVALID OPRAND CR OPot 
196 ERRE di so “"IMNVALIO OPERATORE" 

Sla EFRs 50 = "IMDES IS MOT « OR" 
3165 EFRS(6) s "LAEEL HOT ALFHA-HUMERIC 


193169 EERsc Pi = “IMCORFRECT MUMEER EASE" 


"LABEL DEFINED TWICE" 
"ERAHCH OUT OF EANGE" 
UUMDEFIMED LABEL" 

"OH SIHGLE CHE. EsPEC 


iene “irandir i pedi Capra grin Lor 
eo ig SUSE, 


16 = "OUT OF SYMEOL | 

17 ERR&c153 = "DIVISION EY ZERI 

20 ERR®(18) = “ADDFESSING MODE MOT AY 
ILELE WITH THIS OFCODE" 
9989 DIM FI&(254) © GOSUE 24500 
9990 RETURM 


Se avete preso nota di ciò che avete finora trascritto, capirete immediatamente 
che il presente modulo non può restare completamente isolato, ma va congiunto ad 
un altro già esistente e precisamente al modulo di inizializzazione per le tabelle dei 
tipi di codici operativi e degli operandi sulle quali lavora il disassembler. Nel caso 
dell’assembler si useranno le stesse tabelle, ma nella direzione opposta. Invece di 
cercare un valore in memoria e poi controllare l’appropriato codice mnemonico ed 
il modo di indirizzamento, l’assembler esaminerà i file in ingresso attraverso il file e- 
ditor e cercherà di costruire l’equivalente di ciascuna linea in linguaggio macchina 
oppure di rifiutare la linea come istruzione non lecita. 


Se ci riflettete, questo lavoro richiede alcune informazioni in più poiché, invece 
di essere in grado di leggere un valore e quindi scegliere un formato basato sul codi- 
ce operativo, l’assembler deve, dopo aver trovato un’istruzione come ‘load’ all’ini- 
zio di una linea come ‘LDA $AAAA.X°, essere in grado di esaminare tutti i possi- 
bili formati di un’istruzione ‘load’ per vedere se la presente istruzione è lecita o no. 
Per far ciò sono state aggiunte altre due tabelle a quelle già memorizzate nel pro- 
gramma. Fra le linee 19047 e 19050 è situata una tabella di numeri esadecimali a 
due caratteri corrispondenti a ciascuno dei possibili codici operativi memorizzati in 
TA$(2) per il disassembler. Essi mostrano per ogni codice operativo il tipo del pri- 
mo operando che può essere usato. Le linee 19052-19067 consistono di ulteriori ti- 
pi di operandi per gruppi particolari di codici operativi. 


Più avanti nel programma vedremo come ogni possibile operando viene confron- 
tato con quello effettivamente presente nell’istruzione in linguaggio assemblatore 
contenuta in una riga di FI$. Per il momento basti sapere che rilevando un'’istruzio- 
ne che inizi con ADC (il primo codice operativo a tre caratteri di TA$(2)) l’assem- 
bler passerà a TA$(3). Scoprirà così che questa potrebbe essere un'istruzione con- 
tenente il codice operativo 61 (esadecimale) ed esaminerà il formato dell’istruzione 
in linguaggio assemblatore per vedere se soddisfa il formato richiesto dal codice e- 
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sadecimale 61, cioé ADC($50,X). Se il formato della linea inserita non è conforme 
a quello richiesto dal codice operativo, allora il valore 61 esadecimale (97 decimale) 
verrà usato per trovare il prossimo codice operativo possibile in TA$(4). Questo si 
troverà nella 98.ma coppia di caratteri di TA $(4) (la numerazione parte sempre da 
zero) dove si trova il codice operativo 6D, che segnala un’altra istruzione compren- 
dente ADC, ma questa volta della forma ADC $A AA. Il valore 6D viene quindi u- 
sato per trovare il successivo codice nella tabella che produrrebbe un'istruzione ini- 
ziante con ADC. 


Nel caso di ADC ci sono otto possibili codici operativi e se dopo averli confron- 
tati tutti con il formato dell’istruzione effettivamente contenuta nella riga di FI$ 
nessuno di essi corrisponderà, l’ultimo possibile codice operativo conterrà il valore 
FF, che indica il termine della catena di possibili istruzioni ADC e quindi nessun 
codice operativo legale corrisponderà all’istruzione immessa. Se provate voi stessi a 
percorrere le tabelle con un qualsiasi codice operativo a tre lettere, prima di tutto 
trovandone la posizione in TA$, quindi trovando l’inizio della corrispondente cate- 
na di codici operativi in TA$(3) e seguendola in TA $(4) dovreste riuscire in breve a 
vedere cosa succede. L’unica vera aggiunta alle tabelle già previste dal disassem- 
bler è fatta dalla linea 19046. Essa apparentemente aggiunge sette nuovi tipi di co- 
dici operativi alla lista su cui lavorava il disassembler. Queste sono le direttive as- 
sembler, cioè sette istruzioni che non sono istruzioni vere e proprie del linguaggio 
assemblatore, ma piuttosto istruzioni all’assembler di comportarsi in un certo mo- 
do durante l’elaborazione di un programma in linguaggio assemblatore. Le sette di- 
rettive, BYT, WRD, DBY, END, ORG, PRT e SYM, verranno spiegate più avanti 
nel programma. 


Da 19100 a 19120 troverete i vari messaggi di errore che l’assembler è in grado 
di generare quando incontra un’istruzione non valida o omissioni nel programma. 
Anche questi verranno spiegati più approfonditamente nel seguito. 


TAVOLA DI CONTROLLO 


19046 193 19047 171 1 
19649 252 19650 170 1 
19052 251 19053 2451 
19655 1 19056 1871 
19058 19059 2451 
19061 19062 53 1 
19064 19065 13 1 
19967 221 19068 91 È 


(.) 
(ca) 


MODULO 4.2 


ZONDA REMEDEEEZMEEEA EIA ERA IRE 
20001 FEM GEHERATE ASSEMBLY LISTING 

CODA REMESEEEEEE TETTE DEE EATAEIE4A 
Z0005 SE = DO‘ FMAZ = LENCPTRE (SY = F 


Z@G1A INPUT " ERROR CHLY LISTING «923 
DIE TE 

26626 EDO = LEFT CT$,1)="y" 

26025 INPUT " ASSEMELE TO MEMORY (923 
E 

29 AM = LEFTS (T8,1)="y" 

6 AI = 4: REM SET START ADIFESS 

FOR G = 1 TO FRA 

IHS = FILE$CASC (MINE €PTR$,0. 130) 

GOSUE 2640A 

IF EXIT THEN Q=FMAX+1 

MEXT © 

SS T = FRECK) 

98 AD = d: EC= A: PRINT "ADD. DAT 

SOURCE CODE" 

FORO = 1 TO FMAX 

INS = FILE®CASC (MIDE <PTRS. 0, 1010 

Oi = AI 

GOSUE SFERE 

IF ERE THEN SO25o 

IF_EO THEN S@2za 

He Gi: GOSUE 11006 


PRIORI RI RI 


i pa 


2% TI 
0 LI 


far 
Do 
Pre 


= 
Mm 
NA] 


mai 
ue gi 


=, 
po, 


il PI 


è +# = i mi ai 
* 
I 
= 
# 


Tea TT) a ia RO RI I ID 


GE ="" IPO (ipa! THEH S02g1 


ZHIS6 FORO 
GU Ho= AE 


ae EC 
A 


AME = 


z5 FORO 
CMIDE € 


IF LENCHE5=1 THEH HE 


DI 
DE 


O8.E 


= 1 TO DE 


CHIDE «EG, 133 o GUSUE 1 


Il 


$+H£ o HEST DI 
SFPUCESLFHCOGESI DIE 
GOSUE So100 


A"+HE 


SPOSE 


22 IF MOT AM OR Og="" THEH SOZIia 


1 TO LEHi0fi o FOEE Qi+à=1 


s143 0 HEST 


AIF ESIT THEN GU = FMASTI ©’ FEM LEM 


5g PRINT 


IFSH 


20295 GET T$ 
ZGGAG RETURM 
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PRIHT O" TOTAL EERORS 


PRINT 


THEN GOSUB 265 
IF PEEKCISZI <> E 
(1 GOTO 2036bA 


IF_T8="" TH 


m 
FA 
Fu 
i 
PI 
iù 


IH FI 


ESEMPIO DI ERRORI: lista dei soli errori 


add, data source code 
SA LELUAA LIO £“FARA 


tt i te ce te e rt ct ar ce crt cone n e e te tt n n det ct 
tini nti 


LA JSR c83 005 


ante inn nnt te ce i a flo n AI sp pe tnt ae sie anne ct cen cr 
rutti torrenti 


ADDIFESSING MODE HOT AVAILELE WITH THI 
5 OPCODE ERROR 
A LIA #LELO067H 


DIVISION BY ZERO ERROR 
84 LIA #LELAGA-LELA0A/256 


IHVALID OPEERTOR EFKROR 
140 ECC LELOGA 


anne cea sea panne tnt sveva em dt n dn ga a i ne vin ig e dt n ct n ct e st 
unfenine tinti ninni 


BRANCH OUT OF RANGE ERROR 
159 JMP LBLOA1 
ritatttittttitrrtttrinttiztiii 
UNDEFINED LABEL ERROR 
150 IMP LELOG1 


UNDEFIMEN LABEL ERFROR 
160 LELGAGO RTS 


=anomoescoromemo_ 
tutr=tottntntrntentnnintntntrntnonrpnrri 


LABEL DEFINED TWICE ERROR 
TOTAL ERRORS IN FILE --- 8 
(e) 


H 
LBELADA C8A0 
total number of symbola --- 2 
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ESEMPIO DI ERRORI: lista dell’intero programma 


add. data source code 
lt] 1A FRT 

(a) ZA Sym 

fA SA 0EG £CS0H6 
CERA dA H= © 


59 LELAGAO LIO $FAdA 


cene nin ne coin ae cene a ene cre e dg no dn Gt sms cn e cn a dn cn cn 
rinite ninntnttisni 


LABEL DEFINED TWHICE ERROR 
A SA LELAGA LIG ERA000 
SA ISR ($£3000 


qrere pete pane vani ae tt ate data see nante stato ame donne anne stime ne seni n sin 
fenaditioeec trentino 


AIDIRESSING MODE HOT AVAILELE MITH THI 
S OPCODE ERFOR 
Fo LIA #L_ ELAH 


nt netti inte cette me petto ce cit nre enne can te sven ose st i in te se ni dat pt tic cun tan cen me qa i nt 
titti n 


DIVISION E ZERO ERROR 
SA LD #_BLARA-L BLAdGa/256 


MISE 
IHWALII OPERATOR ERROR 
CRA 543 960 STA 8163 
CROS 0642 166 STA 102 
CERS 60 119 RTS 
CoA 1268 ORG £CAGA 
CAOG 12 139 CLC 
140 ECC LELADA 
ERANCH CUT OF RANGE ERROR 
150 IMP LELMGA1 
UNDEFIMED LABEL EREOR 
150 .IMP LELOGAI 
sornione 
UNDEFINED LABEL ERROR 
160 LELAGO RTS 
tridtcinttt tti detti pn 
LABEL DEFINED THICE ERROR 
CADE 166 LELAO9 RTS 


TOTAL EFRORS IN FILE --- 8 


H [e] 
LELORA C800 
total number of ssumbols --- 2 
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Nelle sezioni precedenti dell’intero programma abbiamo adottato l’approccio di 
spiegare tutti i moduli necessari al funzionamento di un modulo di controllo prima 
di introdurre il modulo stesso. Fare questo nel caso dell’assembler provocherebbe 
una serie di pagine di spiegazioni prima di poter offrire un quadro di ciò che il pro- 
gramma effettivamente fa. La grande complessità dell’assembler ci ha imposto di a- 
dottare un approccio ‘top-down’ e cercare di passare da una semplice spiegazione 
del funzionamento del programma ad un esame dettagliato dell’intero listing ag- 
giungendo poi i dettagli necessari. È per questo motivo che iniziamo il nostro com- 
mento sulla parte principale dell’assembler da questo modulo principale di control- 
lo. Il modulo da solo è totalmente inutile, non compie quasi alcun lavoro se non 
quello di distribuire i compiti ad altre parti del programma. Nonostante ciò, com- 
mentarlo a questo punto ci aiuterà ad offrire una panoramica necessaria del funzio- 
namento dell’assembler. 


Commento 


20010-20029: l’assembler è in grado di compilare un programma in linguaggio 
macchina in quattro modi differenti. Può offrire un listing completo della istruzione 
in linguaggio assemblatore insieme all’elenco di ogni errore presente oppure può e- 
vitare il listing e fornire i soli errori. Un esempio di entrambe queste possibilità è 
mostrato al termine del modulo (v. sopra). Può anche essere istruito per piazzare in 
memoria i programmi in codice macchina risultanti dalla compilazione oppure per 
eseguirli lasciando intatta la memoria. Se ad esempio desiderate inserire in memo- 
ria in una posizione prestabilita una routine in codice macchina fra un punto di ini- 
zio ed uno di fine determinati senza alterare la memoria esterna ad essi, fareste be- 
ne a richiedere prima un listing completo del programma senza che esso venga po- 
sto in memoria. Esso mostrerà esattamente dove il codice macchina assemblato sa- 
rebbe stato posto in memoria prima di compiere qualcosa di irrimediabile! 


20030-20085: prima di iniziare a lavorare sul programma in linguaggio assembla- 
tore la variabile AD viene posta uguale a zero, il che significa che l’indirizzo dal 
quale partirà eventualmente il programma in linguaggio macchina è zero. Durante 
il programma in linguaggio assemblatore questo punto di partenza verrà quasi in o- 
gni caso riinizializzato a qualche altra posizione in memoria per mezzo della diretti- 
va ORG (origine). L’assembler ora elaborerà il programma due volte in quelli che 
vengono chiamati due ‘passi’. Questo ciclo richiama le sezioni del programma che 
esegue il ‘Passo 1°. Durante il passo 1 ogni variabile (compreso un tipo particolare 
di variabile detto ‘label’ — etichetta —, che definisce la corretta destinazione di me- 
moria per un’istruzione di salto) viene esaminata e posta, con i valori ad essa asso- 
ciati, in una tabella nota come ‘tavola simboli’ che verrà usata nel successivo as- 
semblaggio del programma. 
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Ogni linea del programma in linguaggio assemblatore viene ottenuta in IN$ pri- 
ma di eseguire il passo 1. Al ritorno dall’esecuzione del passo 1 su una qualsiasi li- 
nea, viene fatto un controllo della variabile EXIT, che è posta uguale a TRUE se 
viene incontrata la direttiva END durante l’esame del programma. A questo punto 
l'assemblaggio ha termine anche se non si è raggiunto il termine di FI$. Al termine 
del ciclo viene richiamata la funzione FRE, che assicura il compattamento e l’elimi- 
nazione degli spazi inutili, in modo da evitare pericoli di traboccamento dalla me- 
moria. 


20090-20300: questo è il ciclo che controlla il secondo passo attraverso il program- 
ma da assemblatore. La routine per il secondo passo è richiamata alla linea 20130. 
Durante il secondo passo il programma verrà effettivamente assemblato, con la 
traduzione di ogni istruzione valida nei byte necessari a rappresentarla in codice 
macchina come codice operativo ed operando, inclusa la traduzione delle variabili 
in valori e l’assegnamento dei valori alle etichette usate per i salti. Al ritorno dalla 
routine viene eseguito un test della variabile ERR per vedere se è stato rilevato un 
errore. In questo caso nessun’altra elaborazione è eseguita su quell’istruzione. Se si 
é richiesto il listing dei soli errori (EO posta uguale a TRUE) la routine di stampa 
viene omessa. Nelle linee 20150-20221 viene visualizzata in modo standardizzato 
l’informazione ottenuta dal secondo passo. Viene incluso l’indirizzo in cui una i- 
struzione verrà inserita in memoria se il programma verrà effettivamente assembla- 
to in memoria, la rappresentazione esadecimale degli 1, 2 o 3 byte che vi saranno 
posti e l’istruzione originale in linguaggio assemblatore. I byte della necessaria i- 
struzione macchina sono contenuti in 0$ e nelle linee 20222-20225. Se AM risulta 
TRUE, questi byte vengono posti in memoria iniziando dalla locazione opportuna. 
Viene eseguito un test per vedere se si è incontrata la direttiva END e viene prele- 
vata la successiva linea di programma in caso di esito negativo. Infine, se si è trova- 
ta la direttiva SYM durante il corso del programma viene posta a TRUE la variabi- 
le SY e verrà visualizzata la tavola simboli al termine del listing del programma as- 
semblato. 


TAVOLA DI CONTROLLO 


An 123 si 
"a ie: 2 
5 197 e all 
uaar E ARI 
fi z14 Dn) bea] 
na es Hi 16 
ma A A 
Sa Da mA 


' 
4 


ZOlSa 
CAZAOA 
2AZ21 
ZIAZIA 
20230 


VELA] 
DI iI 


Ti 


Lana pa fia 
DO Adani 


fui Ro Rap 


-—_ 


pa BI MON 


SEZIONE 2: routine del passo 1 


MODULO 4.3 


ZEGDO REMEEFEREEEEETE EEE 44 
26401 FEM DO PASS 1 ASSEMELY ON IMN$ 
cedaz REMEESPEEE EEE RETE 
26405 PRINT "CHOM] [CINI] [CI] (CIW] CODIHI CO 
DWYI CCI] CINI] (CINI CCI) CCI] CCI] CCI CO 
TW] CCI] OT] CCI) (CIII CCI] [CINI CCDIHICO 
IWICCINH] 


cedae PRINT" 

26467 PRINT" [HOM] [CI] CINI CCI] CODICE 
TH] CCINII CINI] COD I CCI] CCNI] CCM] [CINI TO 
TW) [CDM] CCI CET [LIMITI] C(CIM] CODMI TO 
IMICCIMI" hi GOSUE 25106 

26416 PASS = 11 ERIT = FALSE i FIERO @ 


"i ZIA GO "i IE epatabai 5] 
z AIF HOT EER THEH Sendo 
26440 IF T=58 AND LENCH#1=0 THEN 26420 


26450 IF T= T=-1 THEH RETURH 
Ri dae GOSIUE A 
IF HOT ERF THEM ZES4O 
IF T=5SS AND LEHCHf)}=f THEN 264za 
A RETURM 
Cad TEO PO355 THEN GOSUE Secedo : GOTO 2 


i GOSUE DEE 


TF_ EER AHD OPS BHT 
GOTO Sesso 


1 
HEISPTE ANIOHOT EMIT THEN 
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Avendo esaminato il modulo di controllo generale per i due passi, vediamo quel- 
lo relativo al passo 1. Ancora una volta lasceremo al seguito le spiegazioni detta- 
gliate dei singoli compiti e ci concentreremo su una descrizione del lavoro globale 
svolto durante questo passo. 


Commento 


26400-26407: queste linee cancellano le due righe inferiori dello schermo e vi 
stampano l’istruzione in linguaggio assemblatore correntemente elaborata, come 
traccia per l’utente del punto cui è giunta l’elaborazione del passo 1. 


26410: la variabile PTR indica dove avrà inizio l’esame della linea corrente. È po- 
sta uguale a due per saltare i due byte contenenti il numero di linea. 


26420: viene richiamata la routine che identifica il codice mnemonico usando la ta- 
bella in TA$(2). La routine esaminerà IN$ a partire dal carattere seguente quello 
indicato da PTR fino a trovare un carattere diverso da una lettera o da una cifra, 
quindi restituirà il controllo. 


26430-26520: al ritorno dal precedente GOSUB, H$ conterrà una stringa di carat- 
teri terminante con uno spazio, due punti o un qualsiasi altro carattere che non sia 
una cifra o una lettera. Se, al ritorno dal GOSUB precedente, non è stato trovato 
un codice operativo valido il cui simbolo mnemonico sia stato posto in H$, la linea 
26440 controlla se è stato trovato qualche carattere prima dei due punti che sepa- 
rano le istruzioni sulla stessa linea (o un carattere qualsiasi che non sia una lettera 
o una cifra). In caso negativo, i due punti vengono ignorati e viene chiamata di 
nuovo la routine che ricerca un codice mnemonico, stavolta a partire dai due punti 
in avanti. 


Nella linea 26540 viene eseguito un test per vedere se si è raggiunto un punto e 
virgola o la fine linea. In tal caso non viene intrapresa alcuna attività sulla linea 
corrente. In questo modo si possono inserire commenti nel programma senza con- 
fusione facendoli iniziare con un punto e virgola. Se H$ contiene dei caratteri allo- 
ra, dal momento che non sono stati identificati come codici mnemonici, vengono 
intesi come etichetta ed il nome viene immesso nella tavola simboli dalla subroutine 
alla riga 28700. Una volta posta l’etichetta nella tavola simboli, il programma ini- 
zia la ricerca del codice operativo mnemonico che dovrebbe seguirla. 
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26540: a questo punto dev'essere stato identificato un codice mnemonico valido. 
Se occupa una posizione nelle tabelle, indicata dalla variabile PO, maggiore di 55 
esso rappresenta una direttiva assembler e viene richiamata la subroutine nella li- 
nea 26600 per valutarla. 


26550: a questo punto, trovato un codice mnemonico valido, viene richiamata la 
subroutine che valuta il tipo di operando. 


26552: ora abbiamo un codice mnemonico lecito e, si spera, un operando di tipo le- 
cito. Non abbiamo ancora la garanzia che il tipo dell’operando sia compatibile con 
quel codice operativo. Questa linea richiama la subroutine che stabilisce se essi for- 
mano una coppia effettivamente valida. La subroutine, nel caso incontri un indiriz- 
zo che potrebbe essere raggiunto con il modo di indirizzamento in pagina zero, 
supporrà che quel tipo di indirizzamento sia effettivamente quello usato, benché ciò 
possa provocare una segnalazione d’errore nel caso il codice operativo in esame 
non possa usare l’indirizzamento in pagina zero. Al ritorno dalla subroutine, se è 
stato selezionato l’indirizzamento in pagina zero ed è stato segnalato un errore, il ti- 
po dell’operando, rappresentato dalla variabile OP, viene incrementato di 6 per tra- 
sformarlo in un modo di indirizzamento assoluto. 


26555: nella valutazione di un’istruzione in linguaggio assemblatore c’è sempre la 
necessità di tener conto di quanti byte richiederà l’istruzione una volta assemblata, 
in modo che l’istruzione seguente inizi al punto giusto in memoria. Questo viene 
realizzato dalla subroutine alla riga 26560. 


26556: se l’analisi della linea non è ancora terminata e non si è raggiunto un 
‘END’, il resto della linea viene elaborato allo stesso modo. 


TAVOLA DI CONTROLLO 


26460 123 26401 26492 122 
26405 229 264A6 56 6407 227 
Sedilo 253 c64za 150 26420 68 

26446 84 26450 102 26460 174 
26456 150 ZE6dSa 66 CESRA S4 

s6020 14 CES4A 34 s6000 166 
26052 190 S6sss 176 26956 247 


26557 142 
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MODULO 4.4 


SlSEN A Zsigra. aiar ti i ELET RTEREZTI 
fl REM PRINT INE TO THE SCREEN 

DA VEE 1446864 RA, 
<0 PRINT ZO6&AS0 (MIE CIME, SZ, 110+HS0C 
IDE CIHE.1, 133 MITE CIME. 31 

24145 RETURH 


Questo modulo si limita a stampare la linea corrente del programma in linguag- 
gio assemblatore, compreso il suo numero di linea. Essa verrà stampata nella parte 
bassa dello schermo durante il passo 1. Nel passo 2 potrà essere inclusa nel pro- 
gramma una direttiva PRT per inviare l’uscita alla stampante. 


TAVOLA DI CONTROLLO 


28100 123 28101 187 28102 123 
ERI2O0 20 
MODULO 4.5 


n 


HD 0 20 at i IS 


REMEREEERE EEE ERE RRAREAR 
REM SYMEOL TO HOH-LETTERSIIGIT 
REMEFSEERE EEE ERE RETE 
Hi="":T=-1 

PTFE = FTR+1 

IF PTIRSLEHCIN®> THEN S&2Z16 

T_= ASC «MIDS cINS,PTR.13) 

IF T=32 AND LEHCHf)=G THEN 25160 
IF T48 OR T396 OR T557 AND TC6S 
MEH 26210 

29200 Hf = Hf+CHRf Ti} | GOTO ZS8165 
28219 RETUFH 


DOS 


Fio 


l'ac RO RE NOCE ASCII RASOI E e AOC] 


DO RIT 
#00 20 


Questo semplice modulo esamina la linea in IN$ a partire dal punto indicato dal- 
la variabile PTR, componendo una stringa, HS, da cui vengono eliminati gli spazi i- 
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niziali e che termina non appena si incontri un carattere che non sia una lettera o 
un numero. Il modulo viene usato dal successivo per restituire una stringa conte- 
nente un codice menmonico o un'etichetta. 


TAVOLA DI CONTROLLO 


25150 123 20151 240 0152 123 
SGIca 6z 25165 125 zol70 3 
25150 175 colSs 79 20190 179 
QOZ0a 9 COZIO 142 


MODULO 4.6 


28850 REMERIERIRE RIE RE RARA 
28851 REM TEST FOR OPCODE/DIRECTIV 
SE RENEE RARE 
GOSUB 28156 
ERR = FALSE 
FTR = PTR-1 
IF LEH(H£>3 THEN 28946 
FO = -2 
FO = PO+S 
IF H=MIN$ «TA&(20.FO.3% THEN 2895 


IF «PO+SI LENTA 211 THEN S6910 
ERE = TEIE 

PO = «FO-1323 

ERE = cPOISS6 0 EER 

IF POSSE THEH FO = PEI-I 

FETUEH 


HI 


LA 


i 
SOI or 
(i hovai) 


Una volta ottenuta una stringa di caratteri che può contenere o meno un codice 
operativo valido o un’etichetta, iniziamo il procedimento vero e proprio di valuta- 
zione di ciò che si è trovato. Il metodo di ricerca del codice operativo corretto è sta- 
to descritto nel modulo 1 ed il procedimento inizia con questo modulo. 
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Commento 


28890: se la stringa restituita in H$ non è lunga tre caratteri, non può rappresenta- 
re un codice operativo valido e quindi non ha senso esaminare la tabella. 


28895: PTR è riinizializzato per puntare all’ultimo carattere di H$ nella linea da 
cui è stato estratto. 


28900-28940: questo ciclo esamina TA $(2) — che contiene i codici mnemonici leci- 
ti a tre lettere — per confrontare ogni gruppo di caratteri con quanto estratto da 
HS. Il puntatore per questo scopo è inizializzato a —2 di modo che alla prima itera- 
zione del ciclo, quando viene aggiunto un tre, la ricerca parta dalla posizione uno. 
Se viene eseguito l’intero ciclo e si raggiunge la linea 28940, i tre caratteri esaminati 
non corrispondono ad alcun codice mnemonico lecito. 


28950: l’indirizzo in TA$(2), che veniva incrementato con passo 3, è ora modifica- 
to in modo che, ad esempio, i tre caratteri nella posizione 19-21 siano ora identifi- 
cati in PO come il codice mnemonico 7. 


28960: questa strana linea deve tener conto del fatto che le tabelle del disassembler 
su cui lavora l’assemblatore contengono i tre caratteri ‘???’ che vengono usati 
quando il disassembler non riesce ad associare un codice operativo valido al conte- 
nuto della memoria. Senza questo controllo si potrebbe immettere ‘???’ in un pro- 
gramma in linguaggio assemblatore e creare così confusione al momento del suo ri- 
conoscimento come codice mnemonico valido. La linea segnala un errore se H$ 
consiste di ‘22?. 


28970: anche questa linea deve tener conto di ‘???’ nella tabella. Le direttive as- 


sembler cadono dopo il punto di domanda, quindi al momento di rinumerarle per 
gli scopi dell’assembler la loro posizione è diminuita di uno. 


TAVOLA DI CONTROLLO 


29950 123 25051 158 26052 123 
298960 173 Sasroa 70 Cossa 156 
28995 176 29900 119 29910 13 
28920 57 23930 2 CE9IGO 27 
28959 61 z096n 1935 20970 59 
28980 142 
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MODULO 4.7 


dala BEER PAIA #4 ii ii e 


THEN E 108 = TRUE PASS 


E GOTTO p 


*OTHEH. ; 
CHE+" US] 


REM IOES = 
THEH PTRE = TE: 


GUSUE 26606 


JE ZENDA i PED CA ST 
NI PASS z 
ce 0 LEHCSTECT1: 293 THEN 


di dn 
25540 IF PAS 
RETURM_ 


= ASC CMIDE (STECTI S.S 133 0 (GC 


Questo è il modulo di controllo per la valutazione di variabili ed etichette e si oc- 
cupa anche di inserirle nella tavola simboli se non sono state già definite in prece- 
denza. Nel modulo 2 un'etichetta era stata descritta come un tipo di variabile per a- 
more di semplicità. Di fatto un’etichetta è una costante che identifica un punto in 
un programma in linguaggio macchina cui un salto deve giungere. Usando le eti- 
chette diviene possibile assemblare un programma in linguaggio macchina in posti 
differenti della memoria senza dover ricalcolare gli indirizzi cui va fatto il salto. 
L’assembler individuerà automaticamente la posizione in memoria di un’istruzione 
etichettata e sostituirà il salto a quell’etichetta con un salto all’indirizzo opportuno. 
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Commento 


28170: se ci sono più simboli di quanti la tavola simboli ne possa contenere (50) 

) 3 - di: î 
l'assemblaggio del programma cessa immediatamente e viene segnalato l’errore 
corrispondente. 


28730: l’etichetta in H$ viene ora inviata al prossimo modulo, che esamina la tavo- 
la simboli (ST$) per vedere se è già presente in essa. Se lo è, ERR è restituita col 
valore ‘falso’ e viene segnalato un errore di ‘label defined twice” (etichetta definita 
due volte). Questo uso invertito dell'errore può sembrare confusionario, ma è ne- 
cessario dal momento che un uso eccessivo del modulo, alla linea 28250, richiederà 
la segnalazione di errore se un’etichetta non è presente nella tavola simboli. 


28740: H$ viene ampliato alla lunghezza di sei caratteri nel caso sia più corto. Sei 
caratteri è la lunghezza massima per un'etichetta. 


28745-28760: il contenuto di H$, se è valido, può essere una variabile oppure un’e- 
tichetta. Se è un’etichetta tutto ciò che l’assembler ha bisogno di sapere è l’indirizzo 
dell’istruzione così etichettata. Se è una variabile sarà seguita da un ‘=’ per asse- 
gnarle un valore. Il modulo esaminatore viene richiamato alla linea 28150 per rica- 
vare il carattere seguente. Se il primo carattere dopo la variabile (trascurando gli 
spazi) non è un segno di uguale, dev’essere un’etichetta e RE (risultato) viene usata 
per memorizzare l’indirizzo corrente della istruzione. PTR viene ripristinata al ter- 
mine dell’etichetta usando la variabile temporanea TB. 


28870: se il contenuto di H$ è una variabile, viene richiamato la sezione ‘valutatore 
delle espressioni’ del programma. Non tenteremo di spiegare il funzionamento di 
questo valutatore fino al termine del programma, dal momento che interrompereb- 
be il nostro tentativo di seguire le principali attività dell’assembler. Per ora basta 
sapere che una chiamata al valutatore di espressioni nel caso di una linea come 
VAR=256 BYTE 1+15 restituirebbe nella variabile RE il risultato della parte de- 
stra dell'equazione. Alla fine tutto diverrà chiaro! 


28790: se RE è minore di zero o maggiore di 65535 (massimo valore ottenibile che 
la CPU possa trattare in una sola istruzione) allora vengono aggiunti al nome della 
variabile o dell’etichetta nella tavola simboli due caratteri che rappresentano un ri- 
sultato di 0 ed un flag che segnala un errore di ‘doppio byte al di fuori dell’interval- 


È j 


lo’. 


28800: se RE è un numero valido allora viene aggiunto nella forma a due byte al 
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termine del nome della variabile o dell’etichetta in ST$. Dal momento che il nome è 
stato reso di lunghezza 6 in ogni caso, sarà facile recuperare il valore di RE per o- 
gni variabile o etichetta. 


28830: si arriva a questa linea solo se il nome corrente è già presente nella tavola 
simboli. Se non è seguito da un codice d’errore, viene aggiunto ora il codice d’erro- 
re 8, che sta per ‘etichetta definita due volte’. 


28835-28837: anche questo modulo viene usato nel passo 2. Nel passo 2 il nome è 
già presente in tavola simboli (piazzatovi durante il passo uno) e così la prima parte 
del modulo non verrà eseguita. Una volta ricavato il nome in H$, se il carattere 
successivo è un uguale, il risultato dell’espressione è già stato ottenuto ed il modulo 
alla linea 26000, che trova il termine di un’espressione o di una riga, viene richia- 
mato per superare il resto dell’espressione. 


28840: i messaggi d’errore sono stampati solo durante il passo 2 e, ovviamente, so- 
lo se si trova un codice d’errore al termine di un nome della tavola simboli. 


TAVOLA DI CONTROLLO 


Cerda 122 20701 175 287092 123 
28710 239 28720 112 20740 31 
29745 126 28759 S1 20760 227 
28770 241 28750 181 22799 4A 
28900 251 28910 253 2oozA 142 
28930 106 29925 101 22036 117 
28937 160 29540 126 25945 55 


MODULO 4.8 


REM FIMD LEEEL IH STE 
EER = FRI i Ha BO TI = Hi 
se €00 IF LENCH: i THEN Ho = Hg+" o " 00G0 


O snai 


71 


SH IF TI=sSE THE M cER = TEUE © FETURH 
2930 IFOMIDE CSTEST1).1,61C3H® THEM TI 
Ti+1 o GOTO A 

35 Has HS So CMIOS CETECTIS E, LI DEpno+àA 
SMIDE «STECTILI.P, 133 RETI JRE 


Questo è un modulo richiamato dal precedente per determinare se un nome di 
variabile o un’etichetta è già presente nella tavola simboli. Il modulo ritorna un se- 
gnale d’errore di tipo 1 o 2 per indicare la presenza o l’assenza della variabile o eti- 
chetta. Viene anche restituito, se c’è, il contenuto dei caratteri 7 e 8. 


TAVOLA DI CONTROLLO 


29259 122 20251 242 20252 123 
22260 735 20e7A 249 cozoo 132 
25299 219 29295 92 

MODULO 4.9 


di E iaia ERROR ROLITI EHE 


to 
ka 
n 


SEA 

: FEM: Pas SECONDARSY ERRORE INL INE 
200169 PRINT SPOÉL4l o GOSUE Slan 
20015 EC = EC+1 

ZRaza FOR X = +15 TO FIR: PRIHT "=" 
HEST @& ‘| PRIHT "[CUPI" 


36 FRINTO" " EFRscEHi o " EREDE" 
6 PTR = SOA : EER = TEME 


Qoeamoadi 


Di 


Questo modulo, che viene chiamato dalla linea 28840 del modulo 4.7, stampa 
un messaggio se è stato segnalato un errore. 
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Commento 


28005: se è già stato segnalato un errore per la linea corrente, si assegna alla varia- 
bile PTR il valore impossibile di 300 (la lunghezza massima di una stringa è 255) e 
non vengono stampati altri errori per quella linea. Gli errori non vengono stampati 
durante il passo 1. 


28010: nel passo 2, l’indirizzo di memoria e i byte dati occupano 14 spazi in una li- 
nea. Quando si stampa una linea in cui dev’essere segnalato un errore, l’indirizzo e i 
dati non vengono stampati. 


28020-28030: l’errore non è segnalato solo da un messaggio d’errore in uscita, vie- 


ne anche stampato un puntatore alla posizione approssimativa in cui è stato rileva- 
to l’errore nella linea, secondo quanto indicato dal valore di PTR. 


TAVOLA DI CONTROLLO 


26000 125 SHAGl 61 Sonda 123 
26005 97 “5010 106 soali 22 
20020 63 Z003A 124 ZE04o 16 


200560 142 


MODULO 4.10 


REMEEESIE RETE EEE E RED EEA 
1 REM SYMBOL UP TO COLON ETC. 

? REMEESEREEE EEE EEE ERERIEEEIEE 
Ho a "o 0 TI s LEHZCIEHSEO 
A FTRE = FIR+I 
IF T1IARTR THEH S60644 
T = ASC (MINE cIME,PTR. 103 

THEN [a] 
: 9 THEH H£ = HE+CH 


cAAELORI An Pa 
RESTI 0 GO0TO S6025 
cedo RETURH 


Questo modulo è simile al modulo nella linea 28150 (modulo 5) ma il suo scopo 
è differente, dovendo determinare il termine di un’istruzione in linguaggio assem- 
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blatore. Differisce dal modulo 5 in quanto non termina col ritrovamento di un ca- 
rattere diverso da una cifra o una lettera, ma solo se trova un delimitatore come 
due punti, punto e virgola o il termine della riga, tralasciando tutti gli spazi presenti 
nella linea originale. 


TAVOLA DI CONTROLLO 


ZEGOO 153 SEGGI ZIO 26002 123 
ZERIO 98 ZEAZA 185 ZEaza 196 
2E04A 1780 26045 247 Z6OSA Zal 
PEDEO 142 


MODULO 4.11 


1 FEM CRICULATE DIEECTINVE LEMGTH 
TI = LEMCIHEI 
IF PO=SS THEH 26rsa i REM EYT DIFE 


IF Po=St THEN GOSUE S<S606 : AD = E 
BEM DERL WITH DR DIFECTINVE 
€ IF PO=59 THEN EX = TELE 
2 THEH RETI IRH o REM EMISE O 


dEi FEM FINI LEM, O0FOWED £& DEY 
HI = AI+=S 

PTR = PITE+I 

IF FIR. :T1 THEH FETUEH 


: (E T=59 THEN RETUEH 
‘46 THEN 2EGg6a 
GOTO ZE6sa 
REM LENGTH FOR EY 
AD = AD+I 

PTR = PIR+I 

IF PTEST1I THEN RETLRH 

T= REC “MIDE cINS,FTR. 130 
IF _T=58 OR T=S9S THEM RETURH 
IF T£346 THEN 26740 
| GOTO 2E730 


DI fi ME 


Ì 


13 
Rami 
MELE 


Questo modulo viene usato esclusivamente nel passo 1 ed agisce su quelle diret- 
tive assembler che sono rilevanti ai fini di quella parte dell’esecuzione del program- 
ma e cioè: BYT, WRD, DBY, END, ORG. Il modulo viene richiamato dal modulo 
3 ogni volta che venga individuata una direttiva assembler. 


Commento 


26620: si occupa della direttiva BYT che verrà discussa alla linea 26720. 


26625: 60 è il codice per la direttiva ORG che viene usata per stabilire l’indirizzo in 
memoria su cui si baserà il successivo assemblaggio. ORG verrà seguito sulla linea 
da un’espressione ed il ‘valutatore di espressioni’ (non ancora spiegato) viene ri- 
chiamato per ottenere dall’espressione l’indirizzo desiderato. AD, l’indirizzo cui 
verrà inserita l’istruzione macchina successiva, è quindi posto uguale al valore del- 
l’espressione. 


26627: se si incontra la direttiva END si pone a TRUE la variabile EXIT. 


26630: a differenza di ORG ed END, nessuna delle direttive con codice superiore a 
58 (SYM, PRT) interessa l’esecuzione del programma durante il passo 1. 


26640-26710: a questo punto dell’esecuzione del programma, deve essere stata in- 
contrata una delle due direttive WRD e DBY. Nel programma in linguaggio assem- 
blatore esse prendono la forma: WRD (0 DBY) $AAAA.$BBBB.$CCCC, cioé la 
direttiva è seguita da una serie di valori a due bytes che verranno immessi diretta- 
mente in memoria — permettendo così di definire una tabella. 

La differenza fra le due direttive è che WRD prenderà i due byte specificati ad e- 
sempio con $ABCD e li memorizzerà nell’ordine CD,AB mentre DBY lo farà nel- 
l’ordine AB,CD. La CPU lavora solitamente su numeri a due byte in cui il byte me- 
no significativo (nel nostro caso CD) viene per primo. Il problema con queste due 
direttive nel passo 1 è che, come abbiamo già notato, si deve tener conto della lun- 
ghezza in byte di ciascuna istruzione in modo che si possa dare alle etichette, quan- 
do vengono definite nel passo 1, il loro corretto indirizzo in memoria. BYT e WRD 
possono essere seguiti da un numero qualsiasi di valori, fino ad una stringa di lun- 
ghezza massima 255. Questo ciclo perciò esamina la linea, contando il numero di 
valori a due byte ed incrementando il contatore di indirizzo AD di due per ogni va- 
lore trovato. 


26720-26790: l’istruzione BYT specifica valori ad un solo byte da memorizzare. 
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Questo ciclo svolge una funzione simile a quella del precedente, incrementando 
però il contatore di indirizzo di uno per ogni valore specificato. 


TAVOLA DI CONTROLLO 


ZOad 123 ALU ZZZ 123 
2e6la 76 IAS HA 
conse 159 sa el 4 

C60sd Zio Go 155 ti) 
Ceca 172 MA ZI 154 
Zerla 172 SA LE1 215 
Cerda 155 A re Fa 
Corea 247 MM 153 11 


MODULO 4.12 


100 REMI ERE ERRE EEE RERE RA 
&1 REM OPERAND TYFE TO EE USEN 
2 REMERRREREREE TERRE REA REA RIS EEE 


Haze THEH OP = 1: RETURN 
THEM OF = © : RETURN 
:=55 THEN OF = 2: RETUR 


cH$, 11="(" THEH OP = 0P-S3 
= LEMCHSI 

(MIDE CHET. 103 

SdE AND TETI THEM T = TH 


2346 THEN 26275 

IF_TST1 THEN 26270 

SC CMIDE cH&,T. 150 

89 THEM OF = GP-1 : GOTO 262 


IF T2=58 THEN 0P = 0P-3 © GOTO 262 


FEM MOT A VALID INDEX 

# EH = So: GOTO 2EGnn 
ee rà IFCOP=1Z0AHIE (POS SANDIFOCES) 0 POSSA 
MIPoE 1600FPO=1Z0RPO=11}THEH OP_= 3 


REM £EE0 PAGE OFEANIS 
IF 0FZ4IA THEH RETUEH 
Tfs PIER: PIE = TO 
i GOSUHE SE600 
IF EER OE FESULTS25O THEH 26 
DPF = OP-È 
PIE = TF 

 PETUEH 


Seguendo lo sviluppo del passo 1 tracciato dal modulo di controllo, incontriamo 
ora le due routine che determinano il tipo di operando da usare e se quel tipo di o- 
perando è adatto al codice operativo, ricordando che non tutti i modi di indirizza- 
mento possono venir usati con ogni codice operativo. Lo scopo di questo modulo è 
di determinare il tipo di operando che si addice al formato mostrato nell’istruzione. 


Commento 


26110: a questo punto PTR indica il carattere seguente il codice mnemonico e vie- 
ne richiamata la subroutine in linea 26000 per ottenere la parte operando dell’istru- 
zione, privata degli spazi. 


26130: se l’operando ha lunghezza zero, il modo d’indirizzamento è quello implici- 
to ed il valore di OP è zero. 


26140: se l’operando è ‘A’ allora si tratta di indirizzamento in accumulatore, 
OP=1. 


26145: se il primo carattere dell’operando è ‘ ’, si tratta di indirizzamento imme- 
diato, OP=2. 


26150-26160: si fa ora l’ipotesi temporanea che il tipo di operando sia 3, modo di 
indirizzamento relativo. La subroutine seguente viene richiamata per vedere se le 
tabelle in TA$ indicano che ciò è possibile per il codice operativo ricavato (cioè il 
codice operativo deve rappresentare un ‘branch’ di qualche genere). Il metodo per 
far ciò viene descritto nel prossimo modulo. I riferimenti a O$ interessano solo per 
il passo 2. La subroutine in linea 26300 inserirà in O$ il byte il cui valore rappre- 
senta il codice operativo determinato. 
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A questo punto invece usiamo la subroutine solo per determinare se il tipo dell’o- 
perando è 3 — non vogliamo incrementare O$ a questo punto, così prendiamo nota 
della sua lunghezza prima che venga richiamata la subroutine e quindi lo riinizializ- 
ziamo alla stessa lunghezza. Se viene segnalato un errore al ritorno dalla subrouti- 
ne in linea 26300 allora l’operando di tipo 3 non è adatto al codice operativo che 
abbiamo e la subroutine procede. 


26170-26260: queste linee sono un'immagine speculare di quelle del disassembler 
che determinano il formato dell’operando dal valore del byte operando di un'’istru- 
zione macchina. In questo caso ricaviamo il tipo di operando dal formato dell’istru- 
zione. 


26270-26280: se si rileva un punto ed il formato non corrisponde a quello dell’indi- 
rizzamento indicizzato viene segnalato un errore di tipo 5 — l’indice non è X o Y. 


26282-26294: queste linee controllano se è possibile eseguire l’istruzione con il mo- 
do di indirizzamento in pagina zero — il formato per l’indirizzamento assoluto e 
quello per la pagina zero sono uguali e si è fatta sino a questo punto l’ipotesi che gli 
operandi che potevano essere entrambe le cose fossero indirizzamenti assoluti. 
Questo è possibile solo con tipi di operando maggiore di 10, che rappresentano i modi di 
di indirizzamento assoluti. PTR è riportato al valore iniziale al termine del codice 
operativo e l’operando viene rivalutato dal valutatore di espressioni. Se il risultato è 
nell’intervallo 0-255 allora è possibile usare il più veloce modo di indirizzamento in 
pagina zero ed il tipo dell’operando è ridotto di 6 per trasformare il modo di indiriz- 
zamento in un qualche tipo di indirizzamento in pagina zero. 


TAVOLA DI CONTROLLO 


26100 123 ZEIDI 213 SELDZ 123 
ZELIO 145 26159 70 26 150 
2E14A 254 26145 2 Zé 244 
26180 160 ZELDA = 26; 242 
ZEZIO 243 2EZZA 2 2E ta 
26240 243 2ezsa 1 26 112 
2E27A 41 serre 2 Ze: ZIE 
262ZB1 99 FEDI 2 2 95 
26286 173 Ze: 1 > 17 
26292 115 26ZI4 1 
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MODULO 4.13 


CESHO REMEEEEE EE EEE EEE EEE EEA 
1 FEM EVALUATE OPCODE 

2 REMERRRRRRRFRRRERITARIAIA ALARE 
LT = PO 

CTAELTIO3,. TEL. 1050 

fio = TRUE ef 
SMINE CTRECIO,.IH 


: IMTETES/1® 


A questo punto facciamo di nuovo uso delle nuove tabelle aggiunte a TA$ nel 
primo modulo dell’assembler. Lo scopo del modulo è quello di confrontare il codice 
operativo ottenuto con il tipo di operando per vedere se effettivamente sono com- 
patibili. In caso contrario deve venir segnalato un errore. 


Commento 


26230: T è stato posto uguale a PO, la posizione del codice mnemonico in TA$(2). 
Così l’equazione fra stringhe in questa linea punta ad una coppia di byte in TA$(3). 
TA$(3) contiene, per ogni possibile tipo di codice operativo, la prima delle forme di 
byte possibili che quel codice operativo può assumere. Il valore è anch'esso il primo 
elemento nella catena delle possibili forme di byte del codice operativo. 


26330: se, con ripetute iterazioni, il valore trovato nella tabella (successivamente 
TA$(4)) è FF esadecimale, non ci sono altre forme di codice operativo disponibili e 
viene segnalato un errore. 


26340-26355: una volta trovato il codice operativo possibile, esso viene confronta- 
to col modo d’indirizzamento necessario in TA$(1). I modi d’indirizzamento per 
ciascun codice operativo sono memorizzati in TA$(1). Un singolo carattere può 
venir usato per memorizzare due numeri fra 0 e 15 semplicemente moltiplicando 
uno dei numeri per 16 e poi sommandoli insieme. In questo modo, il modo d’indi- 
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rizzamento per il codice operativo uno nella tabella dei codici operativi si, troverà 
nel primo carattere di TA$(1), come quello per il codice operativo due. 


Le linee 26350 e 26355 estraggono la parte necessaria del valore del carattere 
(0-15 e 16-255). Se la posizione del codice operativo (PO) nella tabella è dispari, al- 
lora viene usata la metà ‘alta’ del byte (T2/16) mentre se PO è pari viene usata la 
metà ‘bassa’ del byte (T2 AND 15). 


26360: se il modo d’indirizzamento risultante non è lo stesso ottenuto esaminando 
l’operando dell’istruzione in linguaggio assemblatore, la subroutine torna alla linea 
26320 e preleva la prossima forma possibile di codice operativo, insieme al modo 
d’indirizzamento ad essa associato e così via finché non ci siano altre forme di co- 
dici mnemonici. 


26370: se l’esecuzione del programma ha raggiunto questo punto è perché è stato 
trovato nelle tabelle un modo d’indirizzamento adatto al formato dell’operando 
prelevato dall’istruzione in linguaggio assemblatore. Il codice operativo corretto 
per l’operando ed il tipo del codice operativo vengono aggiunti ad O$, che viene u- 
sato per memorizzare ciò che verrà poi immesso in memoria, sebbene questo abbia 
importanza solo nel passo 2. 


TAVOLA DI CONTROLLO 


263090 123 26301 224 263092 123 


26314 9 26329 191 26330 87 
26340 167 26359 81 26355 83 
26360 24 26270 238 262809 79 
26390 142 

MODULO 4.14 


MEMEEEERE EEE EEE EEA 
REM EYTE LENGTH 
FREMESEEEEE EEE EEE ERETTE 
BD = AI+I 

CA IF O0FPà1 THEH AI 
26034 IF 0F3S THEH AI 
6596 RETUFEH 


HIHI 
ADH+1 


Ho 
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Terminiamo l'esame del lavoro dell’assembler durante il passo 1 con questo bre- 


ve modulo. Esso usa sempliceme 
quanti byte richiederà l’istruzione 


nte il tipo di codice operativo per determinare 
assemblata al momento di essere memorizzato 


nel passo 2. Questo affinché la variabile AD possa essere aggiornata correttamente 


allo scopo di definire le etichette. 


TAVOLA DI CONTROLLO 


26560 123 26561 197 26562 123 
26565 215 = 26570 234 26580 241 


CESSA 142 


SEZIONE 3: routine del passo 2 


MODULO 4.15 


27618 


dERITO 
625 FIR 


REMESKPEEEE ERETTE ERETTE 
FEM DO PAS: Fi ELY 
REMEREKEREE REZZA 
PRES 
CE = (LIL 


EEE 


236 GOSUE 26550 


min nani m man 
O Jim = Si 


PRATI 


IF HOT EER THEH SFr 
IF_T=5% AHI LEH[H£l=b 


THEM 27ES 
IF T= 


2593 0€ T=-1 THEH EEE 


JE 


PI 


Lon 
' 


GOSUE = 

GOSUB 2855 

IFOHOT EER THEH Srzi 

IF_T=55 ANI LEMCHEI=A THEN Si 
THEH EER = F 


IF T=55 0R T=*1 


RETLIRH 
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EH = 3 i GOTO Seo 


IF POSSS THEH G0 


SUE SPS: GOT0 2 


3 TS = PIRO GOSUE S6l6G i TE = PTE 


GOSUE 26300 : IF HOT ERR THEN SFP3 


IF OPI7 AND 0FPS35 THEM OP = OF+6 

TO GO0TO Sfrzz 

EH = 1500 GO0TO0 SHAGa 

«29 REM THIS BIT ATTEMPS TO MATEH AESL 

QUTE ADTI MUTE TO OPCODE IF EP HAS FRILED 

2640 GOSUE Sessa 

A IF NOT EER AHI LEMCOSE: 36 THEN GOSGL 

A PTEO = TE 
LEN IMES3SFTRO BND HOT ERIT THEH 


Passiamo ora a fissare l’attenzione sul passo 2. Questo è il modulo di controllo 
per il passo 2 e, come abbiamo fatto per il modulo 4.3, seguiremo lo svolgimento 


generale dell’attività prima di passare ai dettagli. 


Commento 


27605-27700: ad eccezione dello svuotamento della stringa d’uscita (0$) e del fat- 
to che la variabile PASS viene posta uguale a due, queste linee somigliano alla pri- 
.ma parte del modulo del passo 1. Viene fatto un test sul codice operativo e se il ri- 
sultato è negativo si suppone che la prima parte della linea sia un’etichetta o una 
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variabile. Di conseguenza viene eseguita un’altra ricerca di codice operativo e se la 
linea non attribuisce un valore ad una variabile e non c’è alcun codice operativo 
presente viene segnalato un errore di tipo 3 ‘operando o codice operativo non vali- 
do’. 


27720: se il tipo di codice operativo è maggiore di 55, è stata incontrata una diretti- 
va assembler e viene richiamato il modulo opportuno per valutarla. 


27723: viene richiamata la subroutine alla linea 26100 per valutare l’operando. 


27725-27728: la subroutine alla linea 26300 esamina il confronto finora eseguito 
fra codice operativo e modo d’indirizzamento; tenta quindi di confrontarli nel mo- 
do d’indirizzamento assoluto, segnalando l’errore di tipo 18, ‘modo d’indirizzamen- 
to non lecito per questo codice operativo’, se il confronto non è positivo. 


27730: con questa chiamata viene incrementato il contatore di byte AD. 


27740: se non è stato trovato alcun errore e c’è qualcosa in O$, viene valutata la 
parte operando dell’istruzione. T8 è una variabile usata per muovere il puntatore 
oltre un indice del tipo ‘X° alla fine dell’operando, dal momento che il valutatore 
dell’operando non esaminerà oltre. T8 è stata inizializzata nella linea 27723 dopo 
l’esecuzione della subroutine che valuta il tipo dell’operando ed esamina l’operando 
fino in fondo, incluso ogni indice seguente. 


27745: questa linea permette la valutazione di più frasi sulla stessa linea di pro- 
gramma. 


TAVOLA DI CONTROLLO 


27600 123 2F6eal 1047 27602 123 
27605 31 Pola 169 27624 87 
27625 26 Fedi 150 27640 69 
27650 98 CF66a 25 27665 174 
2670 150 27620 69 27699 59 
27695 3% 27700 213 efrea 32 
2723 139 27723 104 27727 172 
2728 11 e7ie9 248 27730 176 
2F740 46 277459 251 ECFoA 142 
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MODULO 4.16 


27200 REMESKEMERD RETTA REATI 
27201 REM DIFECTIVE OPERANDI EVALUATOR 
27202 REMEDEEMEEAEEIEARTEAT EEA ERI A44RE4 
27205 ERR = FALSE 

27219 IF PO0=6S0 THEN GOSUE 22600 : AI =RE 
SULT 

2214 IF FO=62 THEN SY = TRUE 

27215 IF PO=S1 THEH CPEH 2,4: CMD 2: P 
RINT "[(CIMJADI. IDATA SOUECE CONELCI 
WI" 

eeeza IF DOSSI THEH ESIT = TEUE 

27230 IF FO3SS THEH FETURH 

2F2Z4A IF POSSE THEN 2SFAgA 

272509 FEM DEY ® WEI DIFECTIVES 

27260 GOSUHE 25500 


2727 IF RESULTZA OR RESULTESS5SèI THEH E 
H= 2! GOTTO SE006 
27289 IF PO0=SS THEH RESULT = _INTERESULTS 
56 + 256% € RESULTS INT RESULTS EDO ZIO 
S2281 REM 27256 FESERVES HI, "E LO, EYTES 
IF DIFECTIVE IS DET 
49 Ti sTo: GOSUE Sfida : AD = AIDS 
IF T1=dE i SOS 
IF T1=46 
RETUFH 
AO REM EYT DIFECTIVE 
46 GOSUE Sosa 
IF E 
GOTO |; 
GNOSUE 


<A OR RESULT>255 THEM EH 


HI = AD+I 


IF T=@2 THEH GOSUE 25150 
IF T=sdé THEH SF340 


959 RETUREH 


Nel passo 1 abbiamo esaminato un modulo che determinava le azioni necessarie 
una volta incontrata una direttiva assembler e calcolava anche la lunghezza della 
stessa se si trattava di BYT, WRD o DBY. Questo modulo è simile, con la differen- 
za che esegue azioni del tipo dell’apertura di un canale verso la stampante per l’u- 
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scita, della segnalazione SY di stampare la tavola simboli o del trasferimento di dati 
da una direttiva BYT, WRD o DBY alla stringa d’uscita O$. 


Commento 


27210: se si incontra una direttiva ORG, viene valutato il suo operando e il conta- 
tore di byte AD viene posto uguale al risultato. 


27214: la presenza di SYM nel programma segnala a SY di stampare la tavola sim- 
boli al termine del listing del codice sorgente. 


27215: la presenza di PRT nel programma apre un canale d’uscita verso la stam- 
pante per il listing del codice sorgente, altrimenti l’uscita è verso lo schermo. 


27220: END provoca a questo punto il termine del passo. 


27250-27320: il valore di una direttiva a due byte (DBY, WRD) è ottenuto usando 
il valutatore di espressioni ed i due byte vengono scambiati se la direttiva è DBY. 
Questo perché la routine alla linea 27100, che viene ora richiamata, piazza i due 
byte nella stringa O$ nell’ordine basso/alto. ad viene incrementato di due. La linea 
27300 esamina il resto tralasciando gli spazi iniziali e la subroutine esegue un ciclo 
a ritroso per prelevare un altro doppio byte se si incontra un punto. 


27340-27380: è una routine analoga a quella sopra descritta, ma per la direttiva a 
byte singolo BYT. 


TAVOLA DI CONTROLLO 


27200 123 ereil 74 Sal 123 
27205 70 C7z10 166 27214 41 
272159 154 27220 189 2230 221 
d724A 77 SCZIO 243 e 260 173 
27209 176 27230 Î50 27281 31 
27290 30 27300 219 (erzlo 52 
27320 142 27330 93 27340 173 
27350 67 27360 252 27370 170 
27350 2 273909 142 


85 


MODULO 4.17 


GG REMEEEDEEE EEA AEREE EDI EE 444 
"R61 REM EVALUATE OPERANI 

GRZ REMEREETERE IERI ARIETE 
27619 ERR = FALSE 

27020 IF 0FZ2 THEH RETURH 

27030 IF OP=3 THEN SF500 

27040 IF OP=2 THEN 274060 

e 056 GOSUE 25600 

«FH6d IF ERROR LEHSCE)=6A THEH FETURH 
2FAF IF CRESULTZA 0 RESULT>=55) AND OP 
79 THEN EH = 10! GOT0 26006 

Deda IF RESULTS i OR RESULT=SSSZ5 THEH E 


-_, 
do 


IF_OFC A “THEM 27140 
T = IMTCRESULTe 2961 


So) 


fui 
4 
LI RI DD AD RIO 
- 
kr 


«FIA RESULT = RESULT=T#25E 
120 GOSUE 2F140 

SFISA RESULT = T 

271460 0& = N0$+CHE£ cRESULTI 
2156 RETURH 


Questo modulo valuta un operando il cui tipo è già stato determinato, ponendo il 
risultato nella forma a uno o due byte in O$. 


Commento 
27020: se OP è minore di due non c’è operando. 


27030: se OP è tre, è richiesto il modo d’indirizzamento relativo e viene richiamata 
la routine alla linea 27400. 


27050-27080: per tutti gli altri valori di OP viene usato il valutatore di espressioni 
per ottenere un risultato, che verrà confrontato con i requisiti del modo di indirizza- 
mento per uno o due byte. 


27090-27140: queste sono due routine che pongono il risultato ottenuto dal valuta- 


tore di espressioni sotto forma di byte in O$. Notate che i numeri a due byte vengo- 
no posti in O$ con il byte ‘alto’ in seconda posizione. 
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TAVOLA DI CONTROLLO 


27000 123 27001 47° Sena 123 
270109 70 27020 164 SrAsa 20 
27049 18 27059 173 27060. 98 
27079 14 27030 144 20090 27 
27100 117 27110 248 27129 171 
27130 37 27149 121 27150 142 
MODULO 4.18 


SE 
c REMKSH4 


A $444F4H4434434444444444 
160 GOSUE ; 
‘A IF LEN/OF)=6 OR ERE THEN FETURH 
A RESULT = RESULT-AD 
6 IF RESULTZA THEM RESULT = RESULT+E 


TIFO RESULTESIO AHD RESULTOS=O THEH 2 


Questo modulo valuta l’operando di un’istruzione usando l’indirizzamento relati- 
vo, in cui cioè un salto è specificato ddd dall’indirizzo corrente fino a 127 posizioni 
in più o a 128 in meno in memoria. 


Commento 


27530: dal momento che stiamo parlando di indirizzamento relativo, un salto è 
specificato in primo luogo all’indirizzo cui è diretto, quindi il salto relativo è calcola- 
to sottraendo l’indirizzo corrente registrato in AD. 


27540: salti negativi non possono venir immessi direttamente nel programma in lin- 
guaggio macchina, ma devono essere trasformati nella forma nota come ‘comple- 
mento a due’, in cui ogni numero negativo viene sommato a 256, in modo, da pro- 
durre un numero positivo nell’intervallo 128-255. Così i salti con valori superiori a 
128 sono in realtà negativi ed il loro valore si ottiene sottraendo 256. 
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TAVOLA DI CONTROLLO 


CFodd 123 2Fnal 172 rod? 123 
Poli 173 croza 95 2P950 224 
ZF940 75 SFI6A 32 2rarA 220 
SOS 163 


"461 REM EVALUATE IMMEDIATE, EKPRES 
CAGZ REMEKK$4% TÒ : 
7F4ALO TS = PTR 
P4AZA IF ASC CHÉ 


4 SF4RA 


36 IF MINE (Hs, THEH 2745m 
27440 FIR = TS 
442 IF PTESLEMCINE: THEM SPT44E 
27444 IF ASC € CINS.FTR, 1300335 


PTR = FIR+I GUTE 
27446 OP = fo GOSLUE è 
274465 RETURH 

2#456 REM SINGLE CHE, EMPECTET 

27460 IF LENH£C=5 THEN 2F450 

SF4FO 08 = 0$+MIDIS ©“H$.S13 : RETUEH 
2F450 EN = 12 
274969 GOTO 26 


274AZ 
27059 | OF = 2 


Questo modulo ricava il valore di un operando per un’istruzione concernente in- 
dirizzamenti immediati, cioé in cui viene posto direttamente in un registro un valore 
dell’intervallo 0-255. 


Commento 


27410-27420: l’operando viene ricavato in H$ usando la routine alla linea 26000. 
Se non inizia con un ‘ ’ verrà segnalato un errore. 


27430: se il secondo carattere dell’operando è un apice singolo, la routine si aspet- 
terà un unico carattere, dopo l’apice, il cui valore ASCII sarà quello dell’operando. 


Non dovrebbe venir usato un secondo apice. 


27442-27444: queste due linee trascurano ogni spazio in IN$ fino al simbolo ‘hash’ 
(#). 
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27446: poiché l’indirizzamento immediato coinvolge un singolo byte, si usa la rou- 
tine alla linea 27050 per valutare l’operando come se fosse il modo d’indirizzamen- 
to 8 (indiretto Y) e per porre il byte in O$. È semplicemente una scorciatoia. 


27460-27470: queste due linee si occupano di caratteri singoli fra apici. Se la lun- 
ghezza di H$ non è tre allora il formato non è lecito e viene segnalato un errore. Se 
H$ è lungo tre caratteri, il carattere centrale viene preso come quello il cui valore 
ASCII rappresenta l’operando. 


TAVOLA DI CONTROLLO 


2400 123 SF40l 229 20402 123 
SF41A 144 27 ZA 23M 27430 243 
2F440 113 27442 15 27444 169 
2446 435 D7448 142 27450 14 
2F4co 174 74/0 265 74090 232 


2749A 163 


MODULO 4.20 


26900 REMENEIEEIAREAIA AIAR AIAR TARA 
26901 REM DUMP SYMBOL TARELE TO SCREEN 
ZEDOZ REMI AA OA ORARIA A 
26919 IF SEC1I THEN 26975 

26915 PRINT 

26920 FOR X = & TO SE-1 

26920 PRINT LEFT$ (ST&(X,6) TAECIO! . 
26940 H = ASC CMIDE (STECH), S1#256+ASC 
(MID$ CST8(X3,71) 

26950 GOSUE 11600 

ZEREA PRINT. H£ 

26970 NEXT 

26975 PRINT "ICIM] TOTAL NUMBER 0F_SYMEO 
LS ---" SE 

26984 RETLIRH 


Questo modulo non fa realmente parte del passo 2: semplicemente porta in usci- 
ta la tavola simboli al termine del passo 2 se la direttiva SYM era presente nel pro- 
gramma in linguaggio assemblatore. 
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TAVOLA DI CONTROLLO 


Egna 123 26aai 6 26902 123 
26910 27 26915 153 26929 115 
26936 2A 26940 64 26950 159 
26960 37 26970 250 26975 248 
26990 142 


SEZIONE 4: il valutatore delle espressioni 


Finora ci siamo riferiti molte volte alla misteriosa entità nota come ‘valutatore di 
espressioni’, prendendo per buono che facesse ciò che ci si attendeva da lui. Natu- 
ralmente sarebbe stato possibile scrivere un assembler che richiedesse che tutti i va- 
lori venissero espressi in decimale o esadecimale, ma si risparmia una grande quan- 
tità di tempo e di sforzi se l’utente è in grado di immettere variabili, saltare ad una 
posizione ad esempio sei byte più avanti di una particolare etichetta oppure calco- 
lare byte immettendo qualcosa del tipo LDA VAL/256. Il valutatore di espressioni 
rende possibile tutto ciò, come scoprirete quando vi appresterete a trascrivere le no- 
stre routine in linguaggio macchina. 


MODULO 4.21 


FEM EVALUATE LABEL OE HUMEER 
FEMEEEEEEE TRIED ETEEE EE 
GOSUE 25150 

IF T=46 ANDCULEH[Hf£i=5 THEN GOSUE 2 


TI = LEHCHEI i 
ZZ03%5 IF CT=+1 GR T=35 OR T=S0 OR T=59 Ml 
R T=41 CR T=46% AMIOTI = 6 THEH FETUEH 
225340 IF T1=6 THEH 2S06090 

ZOSSA IF ASC €H£ 1357 THEH Ho= VALCHEI 


28360 GOSUE 28250 : REM FINI LAREL IM SY 
MEOL TRELE 
28370 IF ERR THEN EN = 11 : H= @ : GOTO 


235559 GOTTO SEI 


REM HE. OCTAL OR BINARY MUMEERS EN 


T2 = GOSUE 251501 

IF LE 3861 THEH 284060 

IF T: dE THEN SHIA 

IF T=2=5F THEN EHSE = 200 GOITO 2647 
IF Tess THEM ERSE = So GOTO SE47 


20450 REM INVALII LAEEL 

26460 Ho = 6: EN = 6 © GOTO 25000 

22470 REM TEST IF VALID HUMEEF 

22475 GOSUE 11956 

22480 EASE = 16 : FEM DEFAULT EASE 

28490 IF ERR THEH H= @ 0: EN= Po: GOTO 
ZONDA 

28492 PTR = PTR-1 | GOSUE 221560 : REM GE 
T_NEST OPERATOR 

28495 RETURH 


TAVOLA DI CONTROLLO 


26200 123 20301 45 
28329 172 293253 2O8 
28335 198 29346 255 
20360 173 29370 99 
29390 140 20400 243 
28420 56 23430 155 26440 162 
29450 54 29460 158 20470 24 


28475 173 28420 221 20490 56 
28492 213 28495 142 


Questo modulo è il nocciolo del valutatore di espressioni, dal momento che ha il 
compito di estrarre i valori di numeri o etichette, essendo permessi numeri in forma 
decimale, esadecimale ottale (base 8) o binaria (base 2). La subroutine restituisce 
un valore nella variabile H il cui intervallo possibile di valori è 0-65535. 


Commento 


28320: il numero o l’etichetta vengono posti in H$. 
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28325: se il primo carattere incontrato è una parentesi aperta ‘( viene richiamata la 
routine per ottenere il numero concreto. 


28335: all’ingresso nella routine alla linea 28150, la variabile T viene posta uguale 
a meno uno. Se resta inalterata, non è stato trovato alcun carattere significativo. 
Gli altri valori di T possono indicare uno spazio, due punti, punto e virgola, paren- 
tesi chiusa o punto. Se qualcuno di questi è associato ad una HS di lunghezza zero 
allora nell’istruzione non c’è un numero o un’etichetta ed il programma ritorna dal- 
la subroutine. 


28340: se non è presente alcuno dei delimitatori cercati nella linea precedente, si 
suppone che il numero sia preceduto da ‘$°, ‘%’ o ‘&’, indicanti esadecimale, ottale 
o binario e l’esecuzione passa alla routine che estrae da essi un numero decimale. 


28350: se il primo carattere è una cifra, viene preso il valore (VAL) di H$ — perciò 
le variabili non devono iniziare con un numero, dal momento che il valore del nu- 
mero verrebbe prelevato e il resto del nome della variabile ignorato. 


28360-28380: se il primo carattere non è una cifra allora si suppone che quanto è 
stato prelevato sia un'etichetta e si passa alla routine in linea 28250 per determinar- 
ne il valore. 


28390-28490: il puntatore rappresentato da T ha ora passato un carattere che a 
questo punto si presume indichi una differente base numerica. Si verifica quest’ipo- 
tesi. Se viene specificata una base differente, la variabile BASE viene modificata 
per tenerne conto e viene richiamata la routine del monitor che converte numeri 
non decimali in decimali. Se il carattere indicato da T2 non è un segnalatore di 
scambio di base allora esso non è valido e viene segnalato l’errore ‘label is not al- 
phanumeric’ (etichetta non alfanumerica). Se è stata specificata una base diversa 
ma la rappresentazione è scorretta (es. il numero binario 101012) verrà segnalato 
un errore di tipo ‘incorrect number base’ (base non corretta) al ritorno dalla routine nella 
linea 11950. 


28492: il puntatore principale, PTR, che indica il carattere successivo al termine 
dell’operatore corrente, viene decrementato di uno in modo da poter rieseguire la 
procedura sul resto della linea. 
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MODULO 4.22 


CESDO REMERKKEEERRREERAEA RE EE4 RARA 


* GR 
FIERE ETAAA A 
E PTRILEMCIE TUIR 
T=dz 4: TERM 
È £%47? THEM RETURN 
SA GOSUE 2E300 
TERM = GG: EH = 150: 1 


IF Ha «KM THEN 


Uno dei problemi di valutazione delle espressioni è costituito dalla precedenza, 
cioè dal determinare quale parte dell’espressione A B/C +D/E F deve venir valuta- 
ta per prima. Il valutatore di espressioni può trattare la precedenza fra ‘+’ ‘—’ * ’ e 
‘’, ma non quella imposta dall’uso delle parentesi. Le parentesi renderebbero inol- 
tre più difficile distinguere il tipo di operando. Questo particolare modulo tratta le 
due operazioni a precedenza più alta, moltiplicazione e divisione. 


Commento 


28510: viene prelevato un valore usando il modulo precedente e lo si memorizza 
nella variabile TERM. 


28530: se il carattere puntato da T è un segno di moltiplicazione, viene prelevato il 
valore immediatamente seguente e moltiplicato per TERM. 


28550-28580: se il carattere indicato da T è una ‘/’, cioè un segno di divisione, si e- 
segue un test per controllare che il divisore non sia zero; se lo è viene segnalata ‘di- 
vision by zero’ (divisione per zero). TERM viene ora diviso per il valore appena ot- 
tenuto in H. 


TAVOLA DI CONTROLLO 


28500 123 22501 20 29502 123 
28519 150 28520 150 2930 162 
295509 67 22569 1790 26570 152 
28589 93 23599 170 
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MODULO 4.23 


ni CEREA AEREA 

HDI REM EVALUATE E@sPRESSIO 

d REMEEKEREFERE TERI RA ZA ZELL LELLA 

EFFR = FALSE 

2 GOSUE SE506 : RESULT = TEFM 

2S62A IFT=-10R T=52 0R T=55 GR T=559 OR T 

=41 OF T=46 GF PIESLENCINE! THEN RETURH 

226304 IF T=495 THEH GOSUP 2Sesb56 : RESULT 

= INTRESULT+TERMI ‘| GOT0 26620 

2640 IF T=45 THEN GOSUE 255060 RESULT 
INTCRESULT-TERMI o GOTO 26626 


22650 RESULT = 6! EN = 4 © GOTO 28006 


Questo modulo valuta gli operatori, a precedenza inferiore, di addizione e sottra- 
zione. 


Commento 


28610: questo modulo non chiama direttamente il modulo principale alla linea 
28300, ma il modulo precedente. Questo assicura che vengano esaminati i valori 
prima di essere restituiti per determinare se debbano prima venir moltiplicati o divi- 
si per qualcos'altro. Così se l’espressione da valutare fosse AX*B+C, A xB verrebbe 
valutata prima di passare il risultato a questo modulo. 


28620: se si rileva un delimitatore dopo l’operando, non c’è più nulla da valutare. 


28630-28640: se T indica che un segno più o meno segue il valore finora ottenuto, 
viene eseguito il calcolo corrispondente. 


28650: se il carattere indicato da T non è un più o un meno, viene segnalato un er- 


rore di ‘invalid operator’ (operatore non lecito) — i segni per o diviso sarebbero stati 
trattati dal modulo precedente. 


TAVOLA DI CONTROLLO 


28609 123 22601 54 25602 123 
23605 70 29619 47 20620 5 
28630 226 29640 229 28659 21 
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Sommario 


Finalmente è finito. Dipende ora dalle vostre energie lo sviluppare ulteriormente 
il programma Mastercode — che è uno dei programmi singoli più estesi mai pubbli- 
cati su un libro per un microcomputer. Nel resto del libro esamineremo una serie di 
routine in codice macchina che potrete i nmettere usando l’assembler. Se avete altri 
libri sulla programmazione del 650, potreste trovarvi utili routine da immettere. 
Non è una cattiva idea provare cen una o due piccole routine prima di iniziare ad 
estendere il BASIC del 64 col resto del libro, se non altro per familiarizzarsi col 
funzionamento del programma. 

Si raccomanda cor-unque la solita attenzione: assicuratevi di aver salvato il pro- 
gramma prima di tentare qualunque cosa col linguaggio macchina. Tutti possono 
commettere un errore — e dolersene dopo aver perso il programma! 
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Parte II 


CAPITOLO 5 
L’ESTENSORE DEL BASIC 


Per raggiungere il nostro scopo di realizzare routine in linguaggio macchina per 
estendere il linguaggio BASIC del 64, è in primo luogo necessario capire come la- 
vora realmente il BASIC, come un normale comando BASIC viene prelevato ed e- 
laborato senza per ora considerare i comandi che vogliamo aggiungere. 

Consideriamo per primo un comando BASIC molto semplice, come una linea 
del tipo: 1 GOTO 10. Quando premete RETURN per immettere la linea, essa viene 
esaminata dall’interprete BASIC e viene rilevato il fatto che contiene una parola 
chiave BASIC. Questa parola chiave viene ridotta ad un singolo byte nel file di pro- 
gramma. Tutte le parole BASIC hanno questi byte, o ‘token’, i cui valori sono com- 
presi fra 128 e 202 (più 255 per n). Nel caso del GOTO il token è 137. 

Quando il programma contenente questa linea viene fatto eseguire, l’interprete 
BASIC esamina la linea, tralasciando il numero di linea fino a trovare il token, che 
viene riconosciuto come tale dal momento che è superiore a 128 e non racchiuso 
fra virgolette. Il token indica una posizione in una tabella ed in quella posizione si 
trova l’indirizzo di una routine in linguaggio macchina che eseguirà il comando e- 
spresso con GOTO 10. L’interprete esegue ora questa routine macchina che per 
prima cosa esamina la linea seguente il token di GOTO per ottenere un numero di 
linea. Avutolo dalla linea BASIC, il resto della routine macchina per questo parti- 
colare comando si occupa di trovare la linea cui ci si riferisce e di alterare un certo 
numero di variabili di sistema in modo che l’esecuzione salti a quel punto. Se non si 
trova alcun numero dopo il GOTO viene indicato un errore sintattico. Se viene tro- 
vato un numero di linea ma essa non fa parte del programma viene segnalato un er- 
rore di ‘linea non definita’. Supponendo che tutto sia andato come previsto, il con- 
trollo del programma ora torna alla parte di interprete BASIC che ha il compito di 
cercare il prossimo token nel programma. 


Da tutto questo possiamo ricavare un certo numero di azioni necessarie per l’e- 
secuzione di una parola chiave BASIC: 
1) l’interprete deve riconoscerla come parola chiave ed essere in grado di ridurla al- 
la forma di token; 
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2) l'interprete dev’essere in grado di riconoscere il token una volta che il program- 
ma vada in esecuzione; 


3) dev’esserci in memoria una tabella da cui l’interprete possa ricavare l’indirizzo i- 
niziale della routine macchina che esegue il comando; 


4) la routine macchina può dover essere in grado di ricavare ulteriori informazioni 
per il comando (es. il ‘10° per GOTO 10); 


5) dev’esserci la possibilità di riconoscere e segnalare errori evitando l’esecuzione 
della routine. 


Dopo aver fatto eseguire il programma, c’è un altro requisito imposto dal LIST. 
Non serve cercare di stampare i token invece delle parole chiave. L’interprete deve 
avere anche una tabella che gli permetta di ricavare la parola corrispondente a cia- 
scun token, in modo da stamparla nel listing del programma. 

Per poter introdurre nuove parole dobbiamo tener conto di tutto ciò. Una parola 
chiave deve venir posta nell’interprete, dev’essere specificato un token per essa, de- 
vono essere fornite le routine corrispondenti e, cosa più importante, l’interprete de- 
V’essere forzato a riconoscere ed elaborare l’informazione data. Tutto ciò compor- 
terà chiaramente la modifica dell’interprete BASIC, cosa che rappresenta da sè il 
primo problema, dal momento che, come senza dubbio sapete, l’interprete non è in 
una zona di memoria modificabile (RAM), ma nei chip il cui contenuto è fissato al 
momento della fabbricazione. Tutto ciò è vero, ma fortunatamente non è tutta la 
verità. 

Quando accendete il 64, i suoi 64K di memoria sono occupati (grosso modo) da 
8K. di memoria per il Kernal (un insieme di routine macchina molto utili e comuni a 
quasi tutte le macchine Commodore), 8K per l’interprete BASIC, 1K per le varia- 
bili di sistema (locazioni che il 64 usa per memorizzare valori ed indirizzi importan- 
ti per le sue operazioni), 4K di RAM che non può essere usata dal BASIC e 4K per 
gestire altri dispositivi come il chip VIC, dischi, nastri, stampanti ecc. Comunque è 
possibile passare alcune sezioni di questa memoria al controllo dell’utente (RAM) 
— di fatto sono disponibili 64K di memoria volendo escludere ogni altra cosa, cioè 
il BASIC, le comunicazioni con l’esterno ecc. 


L’interprete BASIC sembra occupare la memoria dalla posizione 40960 in avan- 
ti. Di fatto il 64 fa credere alla C PU che il chip separato dall’interprete BASIC oc- 
cupi quella posizione. I veri 8K di RAM in questa zona sono totalmente inutilizza- 
ti, per il semplice motivo che il chip 6502/6510 può vedere solo 64K di memoria al- 
la volta, così se deve vedere l’interprete BASIC non vedrà gli 8K di memoria utente 
corrispondenti. L'importanza di questo per noi è che ci sono 8K inutilizzati, esatta- 
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mente lo spazio per contenere l’interprete BASIC se dovesse risiedere su RAM in- 
vece che su ROM ed esattamente nel punto in cui la CPU si aspetterebbe di trovare 
l'interprete BASIC. 

Il nostro primo passo nell’alterare l’interprete BASIC è perciò di ricopiare il con- 
tenuto dell’interprete BASIC in quell’area. Questo ha i suoi svantaggi — ora l’inter- 
prete può venir alterato (erroneamente) in modo casuale, cosa che non potrebbe ac- 
cadere se fosse tenuto in ROM. Ma può anche essere modificato positivamente se 
sappiamo quello che facciamo! 

Qui sotto è presentato un breve programma che pone tre routine macchina in 
memoria. L’effetto di queste è quello di spostare l’interprete BASIC in RAM. Più 
tardi verranno eseguite brevi aggiunte per permetterci di aggiungere nuove parole 
chiave e fare gli altri necessari cambiamenti. Per il momento basterà spostare l’in- 
terprete. 


BASIC Extender - Listing I 


9 REM12345678901234567290123456789012345 
6782901234567 82901234567390123 

192 REM BASIC EXTENDER ROUTINE 

119 REM MOVE BASIC ROM INTO RAM AT $ADAA 
- €BFFF 

120 DATA 165.1,41,254,1233.1, pe 
DO. 32. 32,8, 190, 1,1,32,6,9, 139,153, 1,1 
139 DATA 200,208,240.165,1,9, ii 133,1,96, 
32,6,8,24,162,255.232,160,255, 2200. 195 
135 DATA 75,8,133,20,185,151,5,45,01.96. 
133, 21,195,227,9.129,20, 144, 535 

139 DATA A 

140 AD = 2054 

150 READ A» IF ASòO THEN POKE AD.A |: AI 
= AD+1 ‘ GOTO 150 

169 REM DO ACTUAL MOVE 

165 POKE 29685,9 : POEE 2075.@ 

179 FOR # = 160 TO 191 

190 POKE 2069,% :! FOKE 2076.% 

200 SYS 2061 

219 NEXT 

2204 POKE 2068,1 : POKE 2@A75.1 

2030 575 2054 

300 END 
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Commento 


0-150: lo scopo delle frasi REM è quello di fornire un’area di memoria pulita. In 
quest’area, che inizia alla locazione 2054 (se fate una PEEK di 2083 vi troverete il 
token del primo REM, cioè 143), la linea 150 immette con l’istruzione POKE i va- 
lori contenuti nelle frasi DATA. Le frasi DATA rappresentano, come avrete sen- 
z’altro capito, istruzioni macchina. 


Routine in linguaggio macchina 


add, data “source code 

(1) 104 PRT 

A 2A SHm 

(a) 304 ORG 2054 
SAK ASOI SA LPLADA LDA 1 
bat apa) 29IFE 6A AND #254 
ZAA BSA1 FA STA 1 

RAC 6A Z0 RTS 

GIATI AAFF 90 LDY #255 
SAF Ce 100 IN 

S1A 2092002 120 LELMA1 JSR LEL00O2 
213 FEMIOI 130 LDX 257.7 
ZIE 2RA6AMB 149 .ISR LBLADA 
819 8A 150 TXA 

Z1A FIA1A1 160 STA 257.Y 
2110 Ca 170 INY 

SIE DOFA 1S5A BENE LELDAI 
SZA ASAI 194 LBLAA? LDA 1 
822 AIAI 240 ORA #1 

224 2501 219 STA 1 

226 6A 229 RTS 


Commento sulle routine macchina 


Qui sopra è fornito il listing delle routine usate nella forma del Mastercode as- 
sembler, per chiarezza. NON IMMETTETE LE ROUTINE USANDO L’AS- 
SEMBLER O LO ROVINERETE. USATE IL PROGRAMMA DATO SOPRA. 


10-30: direttive assembler che mandano l’uscita alla stampante, stampano la tavola 
simboli e fanno iniziare il programma alla locazione 2054 in memoria. 
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50-80: queste istruzioni caricano in accumulatore il contenuto del byte 1 della me- 
moria, ne fanno l’AND con 254 (ponendo così a zero il bit zero) e infine memoriz- 
zano il risultato nella locazione uno. Questo provoca lo ‘spegnimento’ della ROM e 
1’ ‘accensione’ della RAM corrispondente. La routine è auto-consistente. Si sarebbe 
potuto ottenere lo stesso effetto con l’istruzione BASIC POKE 1, PEEK (1) AND 
254, ma questo avrebbe interrotto il funzionamento del sistema dal momento che 
non ci sarebbe più stato un interprete BASIC su cui lavorare. 


90-180: questa routine inizia con un salto alla terza sezione del programma che 
‘accende’ la ROM e ‘spegne’ la RAM. A questo punto del programma la linea 130 
non ha senso; più avanti l'indirizzo da cui verrà caricato il registro X verrà immes- 
so tramite una POKE nel codice macchina. L’effetto finale della routine è di carica- 
re nel registro X un byte dell’interprete, ‘spegnere’ la ROM, trasferire il contenuto 
di X all’accumulatore e memorizzare questo byte dalla ROM nello stesso indirizzo, 
ma con la RAM ora ‘accesa’. Una volta fatto ciò viene incrementato Y. Quando Y 
raggiunge 255 (cioè sono stati trasferiti 256 byte) l’istruzione BNE non verrà più e- 
seguita e si passerà alla routine seguente. 


190-220: immagine speculare di 50-80, queste linee ‘riaccendono’ la ROM prima di 
restituire il controllo al BASIC. 

Noterete che questo listing non comprende tutto ciò che avete immesso — il re- 
sto verrà spiegato più avanti, al momento non viene usato. 


Tornando al programma BASIC in sè: 


165: i nostri programmi in linguaggio macchina richiederanno l’uso di due zeri, vi- 
sto che gli indirizzi su cui si baseranno le nostre mosse di 256 byte avranno tutti 
uno zero nel byte basso es. 40960 che è 160, e zero nella rappresentazione a due 
byte. Mettere gli zeri permanentemente nelle frasi REM avrebbe creato grossi pro- 
blemi per l'immissione di nuove linee. Incontrando gli zeri all'immissione di nuove 
linee la routine BASIC ‘collegamento di linee’ avrebbe rovinato le frasi REM, cer- 
cando di romperle dove fossero presenti gli zeri. Per questo motivo, gli zeri vengo- 
no temporaneamente immessi con POKE per gli scopi del linguaggio macchina e 
poi rimpiazzati da uni alla linea 220. 


165-200: i POKE danno alle istruzioni macchina alle linee 130 e 160 del listing in 
assemblatore gli indirizzi di partenza di 32 blocchi da 256 byte (8K in totale) che 
verranno passati dalla ROM alla RAM. Quando l’indirizzo di ciascun blocco è sta- 
to immesso via POKE nel programma in linguaggio macchina, il programma viene 
fatto eseguire dalla chiamata SYS alla linea 200, che fa partire la routine macchina 
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situata alla linea 120, del listing in linguaggio assemblatore. Vengono spostati 256 
byte quindi viene immesso l’indirizzo del blocco successivo. 


Se avete battuto il programma e l’avete controllato, salvatelo prima che sia trop- 
po tardi. Ora battete SYS 2054 in modo diretto. Se avete commesso un errore qua- 
si certamente la macchina si incepperà. Altrimenti sembrerà che non sia successo 
nulla. 


Ora provate questo: 
300 END (RETURN.)......ancora nulla 
POKE 41118,72 (RETURN)........ ancora nulla 


LIST (RETURN)....date un’occhiata all’ultima riga. Dovrebbe leggersi 300 HND 
— altrimenti avete fatto un errore e dovete spegnere, riaccendere a far ripartire il 
programma BASIC che avete salvato. Se la procedura ha funzionato, immettendo 
END (RETURN) provocherete un messaggio ‘SYNTAX ERROR), cosa che non 
accadrà con un comando HND. Ciò che avete fatto è stato alterare la tabella con- 
tenente le parole chiave BASIC. Se vole proprio divertirvi, battete RUN/RESTO- 
RE per ‘riaccendere’ la ROM, caricate il monitor ed esaminate la memoria a parti- 
re da 41118 (A09E esadecimale) in avanti. Vi troverete le locazioni delle parole 
chiave, ciascuna apparentemente priva dell’ultimo carattere. Prendete nota (o fate 
stampare) delle locazioni poi ricaricate questo programma e rilocate l’interprete. Se 
non modificate il carattere finale o la lunghezza di una parola chiave, potete far leg- 
gere tutto ciò che volete. Provate e poi listate il programma o fatelo stampare. Fun- 
zionerà ancora, ma il suo strano aspetto proverà che avete iniziato a dimostrare il 
vostro potere sul BASIC. 


CAPITOLO 6 


BASIC E CODICE MACCHINA 


Listing in linguaggio assembler 


ia MLN 
dle DPI 


maine 


Ri dI VANUIA 


PRT 
ORG #CARA 
SYM 
KEYURD 
NEW FUNCTION KEYVORDS 
i DEEK 
EYT_69.69. 69, 75+128 
io YPOS 
EYT 29,50,79,83+128 
i VARPTE 
EYT 86,65,82, 60,24, 82+125 


HELD ACTICH YORDE 
DOKE 

BYT 62. 79.75,69+128 

i REILL 

EYT 82.75.73, 76, 76+125 

i DELETE 

ETT GELGAI, fe, 69,54, 69+122 

i MOVE 

EYT 7.79, 56,69+128 

i FAST 

ETT ri. co, da, S4+128 

i SLOW 

EYT 25.76. 793,8f+125 
PILOT 
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Sea EYT 20,76,79.84+128 


ZIA i UNDERD 

do EYTO DI, fo. 60,69, bo, 60+ 120 

10 i SUBEA 

SZA BYT 93,57, 66,69, 208+125 

330 + BLOAD 

240 ETT 66,76, 79,65, 69+128 

ZIA + BVERIFY 

De ETT 665, 05,69, 02, 73, 70, 09+128 
ar i ESAVE 

2390 EYT 66,93, 65, 56, 69+125 

it) FILL 

dAA EYT FA. 73,76, 76+128 

416 YURI A 

420 s THIS IS THE END OF KFEYWORD 
TABLE CHE 

430 ours ns=cne secca tousa 
440 i MEU ACTION VECTOR 

450 ACTNEC 

460 URI $£AZIO 

470 URI £AZSA 

420 JEDI #A22M 

490 URD $AZ3A 

300 URI $A230 

519 WRD #A830 

az HED $A8SO 

330 EI £A2230 

40 URI FASO 

papali) WEI FASSA 

6A URI £ASZA 

de URI SASSO 

nlaii WEI FAZIO 

SAR eee 
GAA i MORMAL 15 THE HORMAL HUMBER 
0F_ERSIC EEYUORDS 

61 HORMAL = 75 

G20 + MEHACT IS THE MUMEER OF NEU 
ACTIOH EEYWORDS 

EIA HEMACT = 13 

Ed i HEWFUN 15 THE MUMEER CF HEW 
FUMCTIOH EEYUORTS 

[epat HEWFUH = 3 

Gel + USE EY FOEEING AFElI WITH “J 
MP ERECUTE 


E 


&r6 ERECUT ISP #73 


GS JSE DOES 

Esa IMP £AF7RE 

FRA DOEX EEC LABEL 

FI SEC RESO 

240 ECC DOLET 

Fa CMPOEHORMAL+HEWF UH] 

FA ECC RETURH 

PO CHF #HOFMAL+HEWFUH+HEUYACT+1 
PEA ECS RETUEH 

FA ESECUTE THE HEW ACTICH EEY 
ORDS 

FR SEC #HOEMAL+HELYFLH 

FOA ASIA 

SAD TA 

Sio LDA ACTVEC+1,."' 

Az FHA 

Hal LIA ACTVEC.H 

SAA FHA 

babe") IMP £73 

Bea LABEL RTS 

Sra DOLET JIMP_ #A9A5 

sea lib IMP _£A7F3 

SIG eee —=-----------—--------- 
AAA i PRINT TOEEH ROUTINE TO USE 
PUEE 774 & 775 HITH PRTTOE ADIRESSE 
d15 PRTTOE J5F PUTREG 

Ad CMPO_#HORMAL+129 

930 BCC PRTNOR 

4A i PRINT THE MEL TOKEEHS 

950 LDA ASAVE 

960 SEC #HOFMAL+1 

ara STA ASAVE 

ILA LDA #EEYWRINZ56 

990 LD #EEYTURISKEEYWEI"256E256 
10600 IMP LELAMO 

1010 i PRINT NORMAL TOKENS 

1920 FRTHOR LIA #$A0 

10939 LDX #$9E 

1040 LELBGA STA £A732 

16050 STA £A731 

1660 STA $A72A 

1076 STA £A739 

1956 JS5R GETREG 

1095 IMP EAF1H 

LIA [e e eee 
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1118 i CRUBMCH TOEEHS ROUTINE ESTR 
R_CODE 
1120 i USE EY ALTERING £AE64 TO < 
IMP CRUNCH" 
1150 CRUNCH JSR PUTREC 
1146 LIA EASFC 
CMP_ REA 
EHE STAHI 
LIA #ECM 
LIE #EO0 
JSP TOESTE 
JSR GETREG 
LI #6 
IMP EASBES 
STRAHD LIA HERO 
LIE #£9E 
ISF TOESTE 
JSP GETREG 
(i LIA EZ0A,A 
1250 IMP_EAGO7 


_ 
rt 
pain] i 


e 
al 


RIONI ponna 
(A RI oi 


aiiiHiH+:di4iau pa 


or 5: 


pi 
al 


GETEEG LIA FSAVE 
FHA 

LIA ASAVE 
L Di EA KA Ul VE 
LINO YSAVE 


ict ona Ri 
MOENDEORAIMRI 


IO 10 Là LI Li ii 


100 FPUTEEG PHF 
1390 STA ASANVE 

1400 STA ASAVE 

1416 ST YSAVE 

14240 FLH 

1435 STA FSAVE 

1440 LIA ASAVE 

1450 RTS 


vene vete done name cn eno cen cone n 


1470 TOESTR STA EASEE 
1420 CLI 
1490 STA £ASEI 
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1506 STA £A60l 

1516 STA £Hedd 

1520 DER 

15050 CP #£FF 

1546 FHE LELOGS 

1556 SEC 

1560 SEC #1 

1570 LELAO3 STA $#A9FL 
1550 STE £HSFE 

L5:90 ETS 

1606 preesistenze 
16516 PSHVE 

1626 ASAVE = PSAVE+I 
1634 KSANE = ASAVE+I 
1640 YSANE = ASAVE+I 


Nota: questo listing è riportato in forma completamente assemblata al termi- 
ne del commento ma è presentato qui in forma non assemblata per amore di chia- 
rezza. 


Ora sappiamo che siamo in grado di alterare il BASIC. Comunque rendere stra- 
ne le parole chiave non è il nostro scopo. Vogliamo invece estendere il BASIC e per 
far ciò dobbiamo eseguire delle modifiche un po’ più consistenti che qualche POKE 
qua e là. Passiamo perciò ad esaminare il più esteso programma macchina che do- 
vrete trascrivere nel corso di questo libro; sfortunatamente dev'essere fatto a que- 
sto punto o nulla del resto funzionerebbe. 

Ricorderete che nello scorso capitolo abbiamo detto che per elaborare un co- 
mando l’interprete BASIC dev'essere in grado di riconoscere il token generato du- 
rante il listing del programma ed anche di sapere dov’è situata la routine macchina 
che esegue l’azione che la parola chiave specifica. Questo viene fatto con l’aiuto di 
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una tabella situata in memoria alle locazioni da A09E a A19D (41118-41373). 
Quando l’interprete BASIC incontra una parola chiave in ingresso, esamina la ta- 
bella fino a trovare una corrispondenza, altrimenti viene segnalato un errore sintat- 
tico. Se la parola chiave si trova nella tabella, la sua posizione (in tabella, non in 
memoria — ad es. la parola chiave n. 0 è END) sommata a 128 dà il token corretto 
per essa, così il token per END è 128. Quando un programma viene eseguito il va- 
lore del token (—128) viene moltiplicato per due e quindi interpretato come posizio- 
ne in un’altra tabella; la tabella dei vettori. Questa tabella dice all’interprete BASIC 
dove trovare la routine macchina per quella particolare istruzione. 


I problemi che chiunque voglia estendere il BASIC si trova ad affrontare sono 
perciò: 


1) ricerca di spazio per le nuove parole chiave nella tabella delle parole chiave; 


2) estensione della tabella dei vettori per indicare gli indirizzi delle nuove routine 
macchina; 


3) ultimo, ma non meno importante: immissione delle nuove routine. 


Questi problemi sarebbero quasi banali se ci fosse spazio nelle tabelle delle paro- 
le chiave e dei vettori. In effetti, la tabella delle parole chiave viene esaminata sotto 
il controllo di un singolo registro della CPU (il registro Y). Il registro è costituito da 
un solo byte, quindi può trattare solo un’area di 256 byte di lunghezza. Le parole 
chiave esistenti nel BASIC del 64 riempiono esattamente questi 256 byte (compre- 
so un misterioso comando ‘GO’ non menzionato nel manuale che permette di sepa- 
rare GO e TO trattandoli ugualmente come GOTO). In altre parole non si possono 
fare aggiunte alla tabella. Inoltre se anche si potesse non c’è spazio nella tabella dei 
vettori per gli indirizzi di nuove routine. In memoria c’è spazio a volontà per le nuo- 
ve routine, ma come fare a far riconoscere all’interprete le parole chiave corrispon- 
denti? 

Qual è la risposta? Come in altre occasioni, quando avete a disposizione un pro- 
gramma che non volete modificare troppo, in questo caso l’interprete BASIC, la ri- 
sposta è che è necessario barare. Quando riduce una parola chiave ad un token, 
l’interprete esamina la tabella delle parole chiave finché non trova uno zero (l’ulti- 
mo byte della tabella). Se si raggiunge questo punto, la parola chiave non è stata 
trovata e verrà indicato un errore di sintassi. Il nostro metodo per estendere la ta- 
bella delle parole chiave è sostituire l’istruzione macchina seguente alla rilevazione 
dello zero con un salto ad una nuova subroutine che inizia nuovamente la ricerca 
ad un nuovo indirizzo, fornendo cosi una tabella vuota di 256 byte in più in cui me- 
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morizzare le parole chiave. Questo trucchetto risolve il problema della ‘riduzione’ 
delle parole chiave, resta solo da convincere l’interprete a riconoscere i tokens ge- 
nerati alla scoperta di una parola chiave nella nuova tabella. 

L’esecuzione dei singoli comandi BASIC è controllata da una sezione dell’inter- 
prete il cui scopo è di consultare la tabella dei vettori e, sulla base delle informazio- 
ni contenutevi, di richiamare la subroutine appropriata per il particolare token. La 
routine RUN, che controlla l’intera esecuzione del programma, richiama questa 
routine di ‘comando singolo’ ogni volta che viene trovato un token nel programma. 
Fortunatamente per noi, la routine RUN non ha l’indirizzo della routine ‘comando 
singolo’ incorporato, ma lo deve leggere da una locazione di memoria RAM (308- 
309 esadecimale). 

Per assicurarci che i nuovi token vengano letti ed elaborati alterneremo l’indiriz- 
zo indicato dagli esadecimali 308-309, in modo che indichi una nuova routine di e- 
secuzione di comando singolo progettata da noi. La nuova routine prima controlla 
se il token incontrato è quello di una delle nostre nuove parole chiave (che possono 
essere riconosciute dal fatto che il loro valore è maggiore o uguale a CC 
esadecimale-204 decimale). Se non si tratta di uno dei nuovi comandi, l'esecuzione 
passa alla routine normale di comando singolo. Se invece è uno dei nuovi comandi, 
allora la nostra routine prende il controllo, indicando un indirizzo completamente 
nuovo per la tabella dei vettori. In questo modo possiamo aggiungere una nuova 
tabella dei vettori all’interprete oltre che una nuova tabella delle parole chiave. 

Se siete riusciti a seguire abbastanza questa spiegazione, siete pronti per prose- 
guire e dare un’occhiata alla routine macchina centrale, essenziale per i cambia- 
menti da fare. 


Modulo 10-30: queste tre linee rappresentano istruzioni per l’assembler che 
dovreste riconoscere dal commento alla sezione assembler del programma Master- 
code. PRT indica che il listing dovrà essere mandato alla stampante (dal comando 
PRT in poi), ORG dice all’assembler di iniziare a memorizzare il programma a 
partire dalla linea C000 e SYM assicura che venga stampata la tavola simboli al- 
la fine del listing. Questa routine macchina e le seguenti occuperanno l’area libera 
di RAM fra C000 e CFFF(49152-53247). Quest'area di memoria non è a disposi- 
zione del BASIC ed è così una posizione ideale per memorizzare codice macchina. 


Modulo 40-120: questa sezione del programma estende la tabella delle parole 
chiave con tre nuove parole, DEEK, YPOS e VARPTR — spiegheremo poi di cosa 
si tratta. A questo punto basta che sia chiara la differenza fra funzioni ed azioni in 
BASIC. Una funzione è un’operazione matematica che deve ricorrere dopo un ‘=’ 
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o un IF, ad esempio, a differenza di un’azione, che può trovarsi isolata e non può 
far parte di un’espressione matematica. La ragione per cui è importante distinguere 
le due cose è che azioni e funzioni vengono trattate diversamente durante l’esecu- 
zione di un programma. Ad esempio viene chiamata una routine speciale ogni volta 
che si trova un segno di uguale. A causa di questo trattamento speciale, l’interprete 
tiene conto della posizione delle parole chiave per funzioni nella tabella delle parole 
chiave ricordando dove iniziano e dove terminano. Le parole al di fuori di questo 
intervallo vengono trattate come azioni e viene segnalato un errore di sintassi se si 
incontrano all’interno di un’espressione, come ad esempio LET A = POKE 
123,123. Nella tabella normale delle parole chiave, quelle corrispondenti a funzioni 
si trovano tutte alla fine, così la posizione più semplice in cui situare nuove parole 
chiave funzioni è l’inizio della nuova tabella, visto che ciò comporterà solo la mo- 
difica del puntatore alla fine delle parole chiave per le funzioni (in questo caso 
dovrà essere incrementato di tre). 


In questo modulo Ie sole linee operative, cioé quelle che verranno assemblate in 
memoria, sono quelle con le istruzioni BYT. Esse definiscono i caratteri delle nuove 
parole chiave in ASCII con l’aggiunta di 128 al valore dell’ultimo carattere per se- 
gnalare il termine della parola (il bit 7 dell’ultimo carattere sarà perciò uguale ad 1). 


Modulo 130-420: in questo modulo sono introdotte le nuove parole chiave per le 
azioni con cui estenderemo il BASIC. Il formato della tabella è esattamente lo stes- 
so spiegato nel modulo precedente con l’eccezione che la lista delle parole chiave 
termina con un'istruzione che assicura che la tabella termini con uno zero. Questo 
permetterà all’interprete di rilevare il termine della tabella. 


Modulo 430-580: questa è la nuova tabella dei vettori. A questo momento non 
avete ancora introdotto alcuna delle routine che permettono alle nuove parole chia- 
ve di fare alcunché. Immettendo questo programma assicurate soltanto che le paro- 
le nuove possano essere usate nei programmi BASIC, trasformate in token e venir 
rilistate. Se vengono incontrate in esecuzione dopo che sia stata immessa questa se- 
zione di programma macchina, tutto ciò che succederà è che il programma termi- 
nerà, dal momento che i loro vettori puntano inizialmente alla routine END del 
BASIC normale. Notate che non vengono inclusi vettori per le parole corrispon- 
denti a funzioni: esse verranno trattate da una routine separata di valutazione delle 
espressioni che esporremo più avanti. 


Modulo 590-650: questo modulo predispone tre etichette con il numero delle pa- 


role chiave BASIC normali, il numero delle nuove parole chiave per azioni ed il nu- 
mero delle nuove parole chiave per funzioni. Queste verranno usate per rendere più 
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leggibile il resto di questa sezione di codice e rendere più facili eventuali modifiche 
se vorrete aggiungere vostre nuove parole chiave. 


Modulo 660-880: questo modulo si occupa dell’esecuzione delle nuove parole 
chiave BASIC. 


Commento 


660-690: ricorderete che abbiamo già spiegato che, al fine di assicurarci che i nostri 
token non vengano rifiutati dall’interprete, modifichiamo l’indirizzo (in 308-309 e- 
sadecimali) che la routine RUN usa per chiamare la routine di esecuzione di un co- 
mando singolo (SCER). Di fatto le locazioni 308-309 rinviano l’esecuzione del pro- 
gramma ad un comando di salto nella routine RUN ed è questo salto che chiama la 
routine SCER. Il riferimento agli esadecimali 308-309, che si trovano naturalmente 
in RAM, è un’intelligente previsione della Commodore per permettere ai pogram- 
matori di fare proprio quello che stiamo facendo noi, cioè di sostituire la SCER 
standard. Queste tre linee sostituiscono tre linee sottratte alla routine RUN, inclusa 
una chiamata alla routine che preleva il prossimo carattere di una linea, un salto al- 
la (nostra) SCER ed un salto indietro all’inizio della routine RUN. 


700-760: queste linee determinano se si è raggiunto il termine di una linea (cioè se è 
stato rilevato uno zero nel salto a $73), controllano il valore di una variabile (mino- 
re di $80) ed infine esaminano il valore di quello che, a questo punto, deve essere un 
token per vedere se rientra nell’intervallo della nuova tabella di parole chiave delle 
azioni. In caso negativo, l'esecuzione passa al normale interprete. 


770-850: il valore della fine della nuova tabella delle funzioni (cioè il numero delle 
parole chiave originali più il numero delle nuove funzioni) viene sottratto dal valore 
del token, ottenendone così la posizione nella nuova tabella delle parole chiave per 
azioni. Viene usato il registro Y per ricavare il corrispondente vettore di azione nel- 
la tabella dei vettori. L’indirizzo viene inserito in cima alla pila. Ora facciamo un 
salto alla routine alla posizione $73, che preleva il carattere seguente nella linea 
(questo perché tutte le routine dell’interprete lavorano con la convenzione che il ca- 
rattere sia stato posto in accumulatore anche se non ne hanno bisogno effettiva- 
mente per le loro operazioni). Alla fine della subroutine chiamata in $73 c’è un’i- 
struzione RTS che preleva il vettore azione dalla pila interpretandolo come indiriz- 
zo di ritorno. Notate che il ritorno effettivo va fatto all’indirizzo successivo a quello 
presente in pila per evitare di tornare alla istruzione che ha appena chiamato la 
subroutine. Ciò significa che tutti i vettori azione della tabella puntano al byte pre- 
cedente la routine che vogliono richiamare. 


113 


860-880: queste linee etichettate fanno varie chiamate se i test durante il program- 
ma sono ‘falliti’ — vengono richiamate dalle quattro istruzioni di BRANCH prece- 
denti. 

Modulo 890-1090: questo ripristina le parole a partire dai token quando il pro- 
gramma viene listato e sarà chiamato dalla normale routine di LIST dopo alcune 
modifiche. 


Commento 


910-930: dal momento che questa sezione viene richiamata nel mezzo dell’esecu- 
zione di un’altra routine (LIST), vengono prima salvati i registri in modo che pos- 
sano essere ripristinati al ritorno. Il token prelevato nell’accumulatore da LIST vie- 
ne confrontato col massimo valore ammissibile per un normale token. Se ha valore 
minore, viene eseguita la normale routine di ricostruzione della parola chiave. 


950-1000: il valore del token in accumulatore viene modificato sottraendo il nume- 
ro dei normali token. L’accumulatore indicherà ora una posizione nella nuova ta- 
bella e questo valore viene memorizzato in ASAVE. I registri A ed X vengono cari- 
cati con l’indirizzo iniziale della nuova tabella delle parole chiave e quest’indirizzo 
viene poi posto nella normale routine di traduzione dei token da una chiamata alla 
LBL0O00. 


1010-1090: se dev’essere stampata una parola chiave normale, l’indirizzo della ta- 
bella normale delle parole chiave viene inserito nella routine di traduzione dei to- 
kens, che può aver lavorato in precedenza sulla nuova tabella. 


Modulo 1100-1280: abbiamo già detto che dopo aver rilevato la fine della tabel- 
la normale delle parole chiave, la routine di creazione dei token viene fatta passare 
ad una nuova nostra routine, che è la presente. Lo scopo del modulo è di creare i 
nuovi token. 


Commento 


1140-1160:$ASFC contiene il byte alto dell'indirizzo della tabella corrente delle 
parole chiave, che può essere quella normale o la nostra. Se il valore è $AO allora è 
stata letta la fine della tabella normale e viene eseguita la sezione successiva. 
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1170-1220: l’indirizzo della nuova tabella delle parole chiave viene posto nella rou- 
tine di creazione dei token (JSR TOKSTR) e la routine viene rieseguita, caricando 
0 nel registro Y per assicurare che cominci all’inizio della nuova tabella. AI termine 
della seconda ricerca, CRUNCH (linea 1130) verrà richiamata ma questa volta 
sarà eseguita l’istruzione BNE STAND. 


1230-1280: l’indirizzo della tabella normale delle parole chiave viene reinserito nel- 
la routine di creazione dei token, i registri vengono ripristinati (JSR GETREG) e 
quindi l’istruzione che era stata cancellata per chiamare questa routine viene riscrit- 
ta. Infine l'esecuzione passa alla routine di creazione dei token che completa l’ope- 
ra. 


Modulo 1290-1360: questo modulo ripristina i valori dei registri che sono stati 
salvati dal modulo seguente. L’unica complicazione è data dal ripristino del registru 
di stato del processore, che non può essere caricato direttamente dalla memoria. 
L’operazione è realizzata portando il valore in accumulatore, mettendolo in pila e 
infine reimmettendolo nel registro del processore. 


Modulo 1370-1450: l’opposto del modulo precedente, vengono salvati i contenu- 
ti dei registri. Notate ancora l’uso della pila e dell’accumulatore per salvare il conte- 
nuto del registro di stato. 


Modulo 1460-1590: l’indirizzo della tabella delle parole chiave è tenuto in tre di- 
stinte locazioni nella routine di creazione dei token. Questo modulo piazza l’indiriz- 
zo richiesto (tabella nuova o normale) in quelle locazioni con la leggera complica- 
zione che la locazione finale richiede il byte precedente la tabella, così si sottrae 1 
dall’indirizzo nelle linee 1520-1560 prima di memorizzarlo. 


Modulo 1600-1640: queste linee non interesseranno la memoria quando il pro- 
gramma sarà assemblato. Esse dicono all’accumulatore di inizializzare le variabili 
specificate dal programma per l’uso. 


Sommario 


A questo punto vi dispiacerà sentire che se avete immesso il programma nell’as- 
sembler e l’avete assemblato tutto ciò che potete fare è salvarlo per qualche tempo. 
Prima che i cambiamenti introdotti da questo codice possano avere buon esito, si 
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devono fare un paio di modifiche al BASIC extender presentato sopra. Qui in bas- 
so c’è il listing del codice come dovrebbe risultare una volta assemblato. Controlla- 
te il vostro programma con questo, paragonando valori dei BYTES e indirizzi: 
spesso i programmi in linguaggio macchina che non funzionano sono fonte di ispi- 
razione. 


CODICE MACCHINA: Listato completamente assemblato 


add, data source code 

Hi 10 FET 

FA ZA ORG sCG00 

CHAD 30 SY 

CHAG dA pe -------- 
CADA SA KEYUEII 

COARA 66; MEM FUMCTIOH KEYMORD 
COAA FA i: DEEK 

CRAA 444545 BA EYT 69,69, 69, 75+122 
CORI 6; YPOS 

CHAI  S9504F 100 EYT SO, 60, 9, So+125 
CHAS 11600; VARFTE 

CHOAS S64152 120 ET S6,65,52,50,54, 82 
+128 

CORE 139 ;-----_--_-------__--=- 
CODE 140 HED ACTIOCH EEYWORDS 
CAAE 1500; DOEE 

CAME 444F4E 160 EYT 65,79, fo, 69+158 
CAL 178: REILL 

COl2 524E49 150 ENT 93.5, Ca, fo, 6t1i2 
CALF 90; DELETE 

CO1F7O 444540 ZHAO EYT 65,64, FE, 69,54, 69 
+128 

CAD ZIO: MOVE 

CHII 404F56E 220 BYT 77. 739,86,694+128 
CAZI 23509 i; FAST 
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FELL 


S34C04F 


momo 


13 DI DI FIDO RI RI PO RI 


DD DONA 
Too Don nono 


(0 BI RI PO RI RI RI 


an +Ùoi ai rain 
Li ig Old mi did 

A 

Dori 

da 

1 

fa 

n 


t] 

a 

OZII S54E44 

1 

a32 ZIA 
G33 S35542 2320 
Coss 350 
COSS 42404F 340 
R 
CASsD 35 
COD 425645 36 


2 
425341 3 


CA44I 
8 
CAdSa 390 
CHE 45494C OA 
CA4I  HAGA dIA 
CHF 425 
FEYWORD THBLE CHE. 
CHF dEH 
la) HI 
HM G 
Gi Fi 
FA Fi 
A la) 
fi 


at 


Zip a 
"=, 


a 


uo PI DU PED DULI Pow 


ib ife Tidone TTT 
ION A ATA SLA A 


:D DD Hi LL Li he e A 


DD ce anni 


caoditoa ta don otnto ridi eo gd 


Sv folto Rol Shi 


man 


GIA 


ENT 82,76. 
i PLOT 

NT SO. 76. 
i UNDERD 


EYT SR, E. er AAA 


FoLaf+1zo 


Fo, S4+128 


i SUEEA 
EYT Toe Lone] 


9, 9 cAa,as+12 


a Le n 


i ELOAD 
TT SE, FO, FA, Go, a+ 12 


i EVERIF 

PYT 66,56, 69,02, 3, 0 
i ESAVE 

E T be, S3., 65, 06, 69+12 


i FILL 

ENT FA, fa, oeni 
WEI 

i THIS 13 THE END OF 


FEetizo 


io MER ACTIOH VECTOR 
AIOTH EC 

URI £ASSE 
MET: 
WRD £A5 
HET 
MEDI * 
WED + 
MEI ERE 
LRD £ 
MET: 
WED: 
URI 
URI FASSE 


Ea LL TS THE MOFMA 


RORMAL = FA 
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620; MEWACT IS THE HUMEE 


9 = 
F_MEDW ACTIOH EEYMORDS 
el 


1a, 
Din 


AE: E2A NEWUACT = 15 
16: E4A ; MEUFUH T5 THE HUMEE 


A 
OFOHEL FUHCTIOH EEYMORTDS 
CA £SO HENFIUH = 3 


Goa 
n ha 


d GSO i USE BY FPOEEIHG AFEI 
TH IMP ESECUTE” 

dI ZO7SAo erd ESECUT ISR #73 

DC Z0F2zC4 ess SR DOEX 

FO 4CHERF 6960 IMP _£AFAE 

4 
m 


AIUTO) 


a 


FHlE rod DOEZ FEED LABEL 

16 SEC #£5M 

"264 BCC DOLET 

Pod CHP #MORMAL+HEUFLIH+1 
1à 46 BCC RETURH 

SIC AI RHOEMAL+HEWFUH+ME 


Uni 


dARI 


i n 
KA 
Fa 
i LD 
UD 
i_Î 
È 
=. 
De 
AOC) 
> 
pr4 
ua) 


JA ECS RETUFEH 
CA i ESECUTE THE HEDWOHET 


DITA 
im a LD 
hot 
L' 
per 
xa] 
=] =] 
<dTi 


SO AA I 


ion MD Di 


im 
Lo E 
Lol 
mal 

4 

di 
300] 
fox 
n 
tu 
= 


RIA ZDTROncEZEIONAGgcNnNdcoaNndimn 
Io UE. 


CO #HORMAL+ MELFI 
H 


Di 
3 2 Li i È 
I 
i 
P 


DS 
DI 


HO RCTVECKI." 


PH ACTVMEC.H 


GTO ADI AD 
È la È 
1 
kon] 


noi 
1) 
n, 
Di 
kr 


1 
i 
U 


di £73 
LABEL FTS 

A DOLET IMP #A49AS 
G20 RETURN JMP_#A7F3 


Tp dn 


Te 
n 

Lx 

MEA 


LA 
Pane Miane DI) 
na: 
LOLA 
DI 
LD 


6. PRIBT TOEEH BOUTINE 
& fi WITH PETTOE ADDRE 
16 PRTTOE ISEE PUTREG 
CMPOBHORMAL+I ZA 

ECC PETHOF 

i PRINT THE MEM TOEEH 


pom 
ka] 


(RADO GE 
IT 
mio Dn 


A ASPVE 
0 RHORMALA1 
STH Li 
Li ETMEDSE 
LEVURTICKES URD25 


LEO 


La 0 
ANI 

Ax 

DD 

iD 


Fa LO 
13 ato 
GD 


=, 


opa 0 Sage RN See vee RI ene RI en RE e RE 
E n ar ana 
Bani 


I 


BE FP 
È o Fi 
E SISAA? 
E SES9H 

nai 


td 
ii 
4 


TME ESTERA CODE 


box] 
i 
RI 


Moon gdii ai 


TO 7 JMP CRUHNCH" 
ZAFAC 1150 
AIFCAS 1145 
CARD 1156 
DAAF 1166 


A RI 


LIU) 

PRULRI) 
i 
AREA 
i+ 
i 
[nx 
ARA 


tf foi Sas è a 
Mao DI 
lm gnun i 
a 
i pipi 
Un] 
l'al) 


daaioadndtiriiotmOmqmio 
Le 
dx 
ha 


Sii 
hi 
bai 
(La; 


CATE 
CONS 
CODE 
CADI AeSE Ci 
CADE 2068001 15040 


mi 
om; 
QU i 
DA DIN TDTD 
D 
i 


0 NA 


DISMiAZI 
2: DIR HE 
> 
PI 
_ 
ha 


12M 


COEBOG ADSSCI 
CHEEG 46 
CHEF RIZISCI 


i 

i 
CAF AESHCI 1 
CAOFS. ACZECI 10344 
COFSO 25 1554 
CHF 6 1364 
CHER 13FA 


AO BE 
BO SIZICI 


1120: 


IMP LELLO 
PRIHNT HOFMAL TOREHN 


BIHE 


CRUNCH TOREHS ET 
USE EY ALTERING £H 


CRUNCH JIJSE PUTREG 
LIA £ASFI 
CMP_#£06 

EHE STAHI 


Fi LIA #£C0 
SA LIA #E00 


J5R_ TOESTE 
J5R GETREG 


GA LIT #6 


JMP_ £A5ES 
STAHID LIA #£AO 


IR TOESTE 


io ToR GETREG 


GETREG LOR FSAVE 


14 PHA 


LIA ASAIVE 
LI; VE 
LIO i 
FLP 
PETS 


1 PIUTREG FHF 


STAR ASAVE 
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SIZOCI 
ADZSSCI 
lett) 


i x] Dara] im i Sami o 
i daisaiiizH<(T 


"RSI vat O ope ion Die Hg a E) 
papa i a ba IS 


CIACO SDIEEAS 1470 
DE 
SEEDAS 
SIBA 
SERBE 
CH 


aa (5) 
1510 
L15244 
L536H 
1546 
1550 


uuam 
SEAN] 
mi TT 
UT 


ZIFCAS 
SEFERS 15204 


GE 


Ooh Tm Did Loan 
DE 


A STK KSAN 


STY UND 


A PLH 


TOESTR STA #ASEE 


co CLI 
dA STE £HSEI 


STA £AEOI 
STE sHE0A 
DEA 

CFR #EFF 
EHE LELOOI 
SEC 

SEC #1 
LELGGS STA 
ST £ASFE 


' 
HOFMAL 
HEMACT 
HELP 
ERECLIT 
DOES 


LMEEL 
DOLET 

RETURN 
PRTTOE 
PRTHOR 
LELOGO 
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CRUHNCH 
STAND 

GETREG 
PUTREG 


Catal 


amine tr 


pai 
+ 


dan 


DIE 
EA AO] 


n 
Loi) 
ui ui=e) 
Dadi 


i 


evil) 


i 
PA PA LA i 
SRI 


DD Do» 


Ri 


e 
Hi 


e RI hi 


bi ( la A 


luniLar| 


(Hier) 


121 


CAPITOLO 7 
BASIC EXTENDER II 


Abbiamo già introdotto un breve programma che trasferisce l’interprete dalla 
ROM alla RAM, permettendo così di fare cambiamenti. Ora che sono state discus- 
se alcune delle necessarie aggiunte al codice macchina, siamo in grado di aggiorna- 
re quel programma BASIC in modo da poter iniziare ad estendere il BASIC. Il li- 
sting completo di questo programma esteso viene ora presentato, sebbene molte li- 
nee siano identiche a quelle della versione che avete già — commenteremo solo le 
variazioni. 


BASIC extender II: listing 


A FEMIZI4SE 990122456 7590123456 7090120345 
GFS9n] 2345679901 20456 7090123 
1 FEM12345678901 2045675901 2345678901 2045 
he Q901 224567 5901 24406 7390123456 7890 

2 REMI2345679901234567990123456799012245 
57890123456789012345678981234567899 
3 REM12345673901234567990123456 75901234 
EF99G121456 7990123456090] 24450 090 
20 DEY = 1 
160 REM BASIC EXTEHDER ROUTIHE 
116 REM MOVE EASIO ROM INTO ERAMO AT ERE 
- $EFFF 
120 DATA 165,141, 254,133, 1,96, 160,253, 
FI, 32,32,9.199,1,1,32,6,8,138,153,1.1 
1359 DATA 200,205, 240, 165,1,9,1,133,1.96, 


32.6, 24, 162, 255, 232, 160, 255, 200,155 
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135 185.151.8, 
133211 20,194, 225 

139 DATA @ 

146 AI = 2054 

159 READ A: IF RC>@ THEN FOKE RD.A © AD 


= AI+1 ! GOTO 1509 
155 REM LOAD MACHINE CODE FROM TAPE/DISK 
156 INPUT " FILE NAME ": INS ‘ IF DENSA 
THEH INS = IME+".5.F" 
157 CPEH 2. DEV. 6, IM$ : IMPUTR 2,5A.EA 
FOR = SA TO ER © INPUT 2.T 0: FOEEGS.T 
159 NERT # © CLOSE 2 
1656 REM DO ACTUAL MOVE 
165 POKE 2968,0 : FOKE 2075,0 
176 FOR X = 160 TO 191 
199 FOKE 2069,X : FOKE 20F6,x 
200 575 2061 
219 MEST 
229 POEE 2065,1: POKE 2675.1 
£21 FEM DATR FOR ROM ESCUTE ALTERATICH 
223 4 = 0°: DATA DES. IE7.7E sE 167, 105, 
da7 167,192 
27 DATA 
222 RERD TI |: IF T1 = 0 THEN 239 
229 READ T2,T3 ! POKE 21235+4,T1:POKE 219 
+, T2:/POKE 2275+%4,T29:/=A+1:/GO0T0 225 


ZIO SYS 2657 : REM ALTER ROM 

221 FEM ALTER CRUNCH TOKEEHS ROUTINE 

za2 POKE 425060, 76 : POKE 425041,194 : POK 
E 42502.192 

241 POKE 774,159‘ POKE 775.192 

S0A END 

Commento 


1-3: le frasi DATA del programma originale provvedono ad una terza routine mac- 
china che non è stata spiegata. Queste frasi REM fanno spazio per i dati su cui la- 
vorerà questa terza routine. 


20: con questo programma esteso caricheremo un file di codice macchina. Il dispo- 


sitivo indicato è il registratore a cassette, così se lavorate col disco dovrete cam- 
biarlo col numero 8. 
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155-158: queste linee caricano un file in linguaggio macchina dal dispositivo speci- 
ficato — l’estensore in linguaggio macchina che abbiamo appena descritto. Le linee 
equivalgono al caricatore di codice macchina del monitor. 


223-227: dati per la terza routine macchina che inizia al decimo elemento della li- 
nea 130 DATA. La terza routine sarà usata per immettere con un POKE nella 
routine di esecuzione dell’interprete un nuovo indirizzo che provocherà un salto al- 
la routine d’esecuzione modificata nell’estensore in linguaggio macchina. Questo va 
fatto in codice macchina perché si devono modificare due byte. Modificare un solo 
byte del salto con un POKE da BASIC avrebbe prodotto un salto non corretto al 
momento dell’interpretazione del successivo POKE. I dati nella linea 223 specifi- 
cano tre indirizzi con i valori per il byte basso, il byte alto ed il numero che vi andrà 
immesso. Il listing assembler per la terza routine è il seguente: 


MODIFICATORE DELLA ROUTINE DI ESECUZIONE: 
listing in linguaggio assemblatore 


del sO0caE J5F £0506 
SZA 15 CLI 

a2zB  FAZSFF LI #£FF 

sz si IMA 

See RAFF LI #*FF 
saio Ca IH 

dl BI4EGS LIA $054E,1 
934 2514 STA £14 

936 B9IS7OE LDA $A9097. 
339 S001 EMI E53C 
S3E o 6A ETS 

SIC SS195 STA £15 

S3E 0 ESESOS LIA £605E3.4 
541 2114 STA C$14,801 
543. S0EE BCC £530 


CONTIMUE © "Ho 0 


Commento sul codice macchina 


Questa routine prende indirizzi a due byte dai dati nelle frasi REM e vi pone 
nuove informazioni (prese anch’esse dalle frasi REM). Le istruzioni agli indirizzi 
827-82E ‘accendono’ la RAM ed inizializzano il flag di riporto, i registri X ed Y. 
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Le linee 830-83C caricano i byte bassi ed alti degli indirizzi dalle frasi REM alla li- 
nea 1 del programma BASIC, eseguendo un controllo sui byte alti per vedere se ri- 
cadono nell’intervallo corretto di indirizzi per l’interprete. Le linee 83E-843 prele- 
vano e memorizzano i nuovi dati, saltando indietro per ricevere nuovi indirizzi. 


Torniamo al programma BASIC: 


228-229: questi nuovi dati vengono inseriti via POKE nelle linee 1,2,3 per essere 
prelevati dalla terza routine macchina in linea 0. 


230: ora diviene SYS 2087 invece di SYS 2054. La routine macchina in 2054 viene 
ancora chiamata, ma dall’interno della terza routine macchina alla linea 0. I cam- 
biamenti necessari per l’esecuzione della routine verranno completati da questa 
chiamata. 


231-232: il nuovo indirizzo viene immesso con POKE nella routine di creazione dei 
token — cosa che si può fare da BASIC perché la routine di creazione token non è 
usata durante l’esecuzione di un programma (non si potrebbe fare in modo diretto 
dal momento che i token dovrebbero venir creati in esecuzione). 


240-241 viene modificato il vettore ‘stampa token’ per puntare alla nostra routine 
modificata. 


Una volta modificato il vostro primo programma BASIC extender, o immessa 
ex novo questa versione, la cosa migliore sarebbe salvare questo programma all’ini- 
zio di un nastro, lasciare uno spazio per ulteriori estensioni al programma e quindi 
salvare sullo stesso nastro la versione assemblata del programma visto al capitolo 
6. Quando il programma verrà eseguito, vi verrà chiesto di indicare il nome del file 
e voi dovreste rispondere con qualsiasi nome abbiate dato al programma del capi- 
tolo 6 quando l’avete salvato. Vi basta premere ‘PLAY’ ora per caricarlo, evitando 
così un gran lavoro di scambio di cassette. 

Una volta assemblatolo ed introdottolo in memoria con questa tecnica, dovreste 
essere in grado di immettere qualsiasi nuova parola chiave azione (non ancora fun- 
zione) specificata nella tabella. Come detto nessuna di esse farà ancora nulla se non 
eseguire END, ma presto le cose cambieranno! 
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CAPITOLO 8 


PAROLE CHIAVE BASIC 
PER AZIONI 


SEZIONE 1: UNDEAD 


Ora che sono state presentate le routine BASIC oltre al codice macchina per 
estendere il BASIC, è tempo di introdurre le routine che permettono alle nuove pa- 
role chiave di fare qualcosa. In questa sezione del libro discuteremo tre parole chia- 
ve per azioni che sono più semplici di altre, non richiedendo l’introduzione di para- 
metri per la loro esecuzione. Nel normale BASIC, ad esempio, il comando GOTO 
10 non richiede solo una routine per eseguire il GOTO, ma anche una che prelevi il 
parametro 10, senza il quale il GOTO sarebbe privo di senso. D’altra parte STOP 
non richiede parametri oltre alla parola chiave stessa. Più avanti mostreremo come 
aggiungere parole chiave che richiedono parametri. 

La parola chiave che aggiungeremo ora è UNDEAD — alcuni la chiamano 
‘OLD’, ma la notte precedente quella in cui venne scritta questa routine la TV tra- 
smetteva un film di vampiri... 

L’effetto del comando è quello di superare quel seccante problema che di tanto 
in tanto tutti devono affrontare — si batte NEW per togliere un programma dalla 
memoria ed improvvisamente ci si ricorda di non averlo salvato. UNDEAD ripri- 
stinerà il programma con la sola eccezione che le variabili andranno perdute. 


UNDEAD: listing in linguaggio assemblatore 


16 FRT 

za STA 

2a ORG $CA050 

4A WHRD UNDEAD-1 

el) ORG E£CIES 

(ata) UMDEAD LIA #£FF 
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FA LIM #1 
ZA STA SCESE." 
A JSP £ASHZ 
166 LIA £22 
116 CLE 
120 CLI 
15050 ADI #2 
140 STA £21 
156 LIA £23 
166 ADC #0 
1FA STA £2 
150 IMP _£HRESE 
1596 END 
EHTI 


30-40: ricordérete da qualche pagina più addietro che tutti i vettori azione per le 
nuove parole chiave puntano al momento a END. Queste due linee pongono l’indi- 
rizzo dell’etichetta UNDEAD nell’appropriato vettore azioni della nuova tabella. 


50: le routine macchina delle nuove parole chiave occuperanno, insieme all’exten- 
der macchina, un’area di memoria fra C000 e C4BS5 esadecimale. Non verranno 
immesse in ordine, ma la cosa non avrà conseguenze sulla loro esecuzione. 


60-90: quando si esegue NEW, una delle modifiche che essa fa è costituita dal por- 
re tre BYTES contenenti zero all’inizio dell’area di programma (800-802 esadeci- 
male), sebbene uno di essi (800) sia comunque sempre uguale a zero. Tre zeri rap- 
presentano l’indicatore di fine programma per l’interprete, quindi ogni tentativo di 
eseguire o listare il programma dopo NEW termina prima di iniziare, nonostante il 
programma sia intatto in memoria. Queste linee pongono il valore esadecimale FF 
nel terzo byte dell’area di programma, essendo questo il byte alto dei due byte di 
collegamento della prima riga di programma BASIC — il valore nei due byte è ora 
senza significato, ma non ha importanza. Viene ora chiamata la routine ‘ricollega 
linee’ dell’interprete, all’indirizzo A533 esadecimale, che esamina il programma ri- 
pristinando tutti i byte di collegamento che iniziano ogni linea BASIC e puntano al- 
l’inizio della seguente. 


100-170: la routine di ricollegamento delle linee usa i due byte di memoria posti alle 
locazioni 22-23 esadecimali come una variabile che indichi il punto cui si è arrivati 
nel programma e, quando l’elaborazione è terminata, questi byte puntano al termi- 
ne dell’ultima linea del programma BASIC. Questo valore viene prelevato e posto 
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nel puntatore principale che registra la fine del programma BASIC, con l’aggiunta 
di 2 per tener conto dei due zeri extra che indicano la vera fine del programma. 


180: ci sono vari altri puntatori da ripristinare prima di recuperare con successo il 
programma, ma ciò si può fare con una semplice chiamata alla routine CLR del- 
l’interprete normale. 


190: notate l’uso della direttiva END. È utile non solo per indicare il termine del li- 
sting in linguaggio assemblatore all’assembler Mastercode, ma il suo indirizzo è an- 
che il primo byte libero dopo la fine della routine che esso termina, in modo che o- 
gni routine che vada aggiunta dopo questa, possa iniziare all’indirizzo specificato 
per END nel listing in linguaggio assemblatore. 


UNDEAD: listing completamente assemblato 


add, data soupce code 

Da 10 PET 

FA 204 SYM 

A 30 ORG £COSI 
CASI 4A WF UNDERD-1 
CASF SA ORG £C1E3 
CIES 60 UNDERDI LIA #£FF 
CIES FA LIN #1 

CIEF SA STA cEZEI. 
CLES IA JIJ5R EA523 
CIEC 106 LIA £Z2 
CIEE 116 CLC 

CIEF 1Z04 CLI 

CIFH 1509 ADC #2 

CIFZ 140 STA £2D 
C1F4 150 LIA $23 
CIFE 160 AIC #A 
CIFSO SSZE 17A STA £2E 
CIFRA 4CCERS 156 .IMP_£A6SE 
CIFIO 196 ENI 


TOTAL ERFRORS IN FILE —-- 8 


UNDEAD C1E3 
total number of symbols --- 1 
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La procedura da seguire per immettere questa routine è: 


1) caricate il programma Mastercode e per prima cosa richiamate il file in codice 
macchina dell’extender che avete introdotto in passato. La ragione per cui questo è 
necessario è che nell’assemblaggio di UNDEAD uno dei vettori azione della nuova 
tabella viene riscritto — questo non otterrà molto se il programma predetto manca! 


2) immettete il listing in linguaggio assembler di UNDEAD usando il file editor. 
3) richiamate l’assembler ed assemblate UNDEAD. 

4) salvate l’area di memoria compresa fra C000 e CIFC nella forma di file in co- 
dice macchina o, meglio ancora, l’area fra C000 e C4BS, che è l’intera zona che 
sarà poi usata dalle nuove routine. Usando questo secondo metodo ogni volta che 
si immette una nuova routine, sarete sicuri di non tagliare inavvertitamente alcuna 


delle routine seguenti come posizione in memoria, ma immesse precedentemente a 
quella corrente. 


5) caricate l’estensore BASIC II e fatelo eseguire, dandogli il nome del file conte- 
nente l’estensore ed UNDEAD. 


6) se tutto ha funzionato a dovere, potete ora dare NEW e poi cercare di dare 
LIST — non apparirà nulla, come vi aspettate. 


7) immettete in modo diretto UNDEAD e premete RETURN. Date ancora LIST 
e dovreste vedere il programma completamente riportato in vita. 


UNDEAD: note sull’uso 


UNDEAD può ripristinare un programma solo se non si è scritto nulla su di es- 
so in memoria. Se dopo aver dato NEW immettete una linea BASIC o dichiarate 
una variabile, non c'è modo in cui UNDEAD vi possa aiutare, poichè il program- 
ma non è più intatto in memoria. 


SEZIONE 2: Subex 


Immettete il seguente programma nel vostro 64: 


10 GOSUB 20 
20 GOTO 10 
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Ora fatelo eseguire e vedrete in un istante che avete esaurito la memoria-come? 
Ogni volta che una subroutine viene chiamata, l’indirizzo cui deve saltare l’esecu- 
zione quando si incontra RETURN viene memorizzato in un’area detta ‘pila di ri- 
torno’. Ogni RETURN prende l’ultimo indirizzo della pila e vi salta, ogni GOSUB 
aggiunge un indirizzo sopra quello già presente in cima alla pila. Uscendo da una 
subroutine con un mezzo diverso dal RETURN, l’indirizzo di ritorno resta sulla pi- 
la. Se la cosa si ripete spesso la pila si riempie e si genera un errore di tipo ‘OUT 
OF MEMORY. 


Ammettiamo che uscire da una subroutine senza un RETURN non è una prati- 
ca da incoraggiare troppo e, dopo tutto, perché usare un GOSUB se non si vuole 
tornare in quel punto? Ci sono però circostanze nelle quali può essere estremamen- 
te utile uscire da una subroutine senza ingombrare la memoria. Se guardate il lin- 
guaggio assemblatore, ad esempio, vedrete che ci sono molti casi di subroutine che 
chiamano subroutine che chiamano subroutine... Non c’è nulla di male in questo, 
anzi è buona pratica di programmazione mettere il maggior numero di subroutine 
possibile. Ma cosa succede se, a distanza di quattro o cinque subroutine dalla routi- 
ne di controllo trovate una condizione che comporta la non esecuzione della catena 
di subroutine — ad esempio un errore nei dati in ingresso? Ciò che desiderate è se- 
gnalare l’errore e tornare immediatamente alla routine di controllo in modo da 
prendere i necessari provvedimenti, ma ciò non è possibile nel BASIC standard. 


Dovete risalire attraverso le subroutine, inserendovi ogni volta una linea che rilevi 
la segnalazione d’errore e ritorni ancora fino a raggiungere la routine di controllo. 
In un programma complesso ciò può implicare molte linee in più ed un considere- 
vole costo in termini di tempo. 


La risposta al problema è il comando SUBEX. Tutto ciò che fa è rimuovere l’ul- 
timo indirizzo di ritorno dalla pila, in modo che possiate uscire dall’ultima subrouti- 
ne senza ingombrare la pila. Ovviamente se volete saltare direttamente dalla quinta 
subroutine di una catena all’inizio della stessa SUBEX dovrà venir eseguito cinque 
volte, ma il risparmio di tempo e di complessità di programma può essere spesso 
considerevole. Con un SUBEX un programma del tipo: 


10 GOSUB 20 
20 SUBEX 
30 GOTO 10 


proseguirà indefinitamente. 
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SUBEX: listing in linguaggio assemblatore 


LA FRT 

ze Sy 

K:15) DRG £C05F 

da WRD SUBEZ-1 

So ORG £CIFI 

etti SUBEX LDA #£FF 
FA STA £4FA 

Ba ISF £AS6A 

DA TAS 

LA CMP #£211 

11% EHE RETERE 
126 FLA 

150 PL 

140 PLA 

154 PLA 

160 FLA 

17A RTS 

150 RETERR IMP £ASEM 
190 EHI 
EHI! 


60-80: quando si esegue un RETURN nel BASIC normale viene chiamata la routi- 
ne alla posizione A38A esadecimale per trovare il primo indirizzo di ritorno sulla 
pila, cosa necessaria perché potrebbero essere in pila anche dati necessari per un ci- 
clo FOR. La routine a quell’indirizzo manipola anche la pila in modo che il primo 
indirizzo di ritorno sia posto in cima alla pila. Queste linee pongono l’indirizzo di 
memoria uguale a 4A esadecimali, il che inizializza la routine di ricerca, poi la rou- 
tine viene chiamata. 


90-110: al ritorno dalla routine di ricerca in pila, l’ultimo valore da porre in pila 
sarà, si spera, un puntatore alla posizione dell’indirizzo di ritorno nella pila ed esso 
viene immagazzinato nel registro X. Questo è confermato inserendo il valore 8D in 
accumulatore. Se non è stato trovato un indirizzo di ritorno l’accumulatore non 
conterrà 8D e verrà fatto un salto a RETERR, che specifica un salto al messaggio 
di errore ‘RETURN WITHOUT GOSUB ERROR. 


120-170: i cinque byte dell’indirizzo di ritorno vengono tolti dalla pila ed eliminati. 
La routine SUBEX è completata e ritorna. 
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SUBEX: listing completamente assemblato 


add, data acoufre code 

FI 16 FRT 

HA 2A 5YM 

FA 30 CFG ECOSF 
CAOSF FCCI 4A WEI SUBEZ-1 
CA61 SA ORG £C1FI 
CIFDO ASFF 60 SUBEX LUA #£FF 
CIFFO £54A FA STA £4H 

CE010 2A2AA3 RA I5FR £A38 
CZ04 94 DATES 

CZAS CSS GG CMPO #E511 
CZAF DABE 116 EHE RETEKFR 
209 683 120 PLM 

CZHAA 68 1204 PLA 

CZAB 68 140 PLA 

CZHI 6a 150 FLA 

CZ2AN 68 1664 PLFI 

CIAE 66 170 FTS 

CZAFO 4CEAAS 1504 FETERR JMP E£ASEM 
C212 196 EHI 

TOTAL EFRORS IN FILE —-- HM 
SUEES CIFI 

RETERR UZAF 

total number of s4mbola ee 2 


Come per UNDEAD, la procedura per caricare SUBEX in memoria è di chia- 
mare prima l’ultimo file in codice macchina che avete salvato (extender- 
UNDEAD), caricatelo in memoria poi assemblate SUBEX. Salvate l’intera area di 
memoria e fate eseguire poi il BASIC extender II, dando il nome del vostro nuovo 
file. Dovreste ora essere in grado di far eseguire il secondo programma BASIC da- 
to nell’introduzione di SUBEX senza terminare la memoria. 


SUBEX: note sull’uso 


SUBEX è un comando potente ma c’è bisogno di attenzione nell’uso. Se siete al- 
l’interno di una catena di subroutine, è essenziale che contiate esattamente quanti 
RETURN desiderate saltare o vi capiterà di rientrare nella routine sbagliata o di ri- 
cevere un errore di tipo ‘RETURN WITHOUT GOSUB». 
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SEZIONE 3: RKILL 


Durante lo sviluppo di un programma è buona norma includere tante frasi REM 
quante sono necessarie ad assicurarvi di comprendere il programma la prossima 
volta che vi lavorerete. La leggibilità inoltre è migliorata spaziando bene i comandi 
sulle linee. Quando il programma è terminato però i REM e gli spazi extra sono 
semplicemente memoria sprecata che potrebbe essere meglio impiegata. RKILL ri- 
solve questo problema eliminando tutti i REM posti al termine di linee BASIC e 
tutti gli spazi fuori dalle virgolette. Notate che non rimuove i REM che occupano 
da soli una linea poiché, se scrivete correttamente i vostri programmi, potrebbero 
essere le intestazioni delle diverse sezioni del programma. I GOTO e GOSUB pun- 
teranno ad essi, permettendo così di aggiungere nuove linee iniziali alle sezioni sen- 
za dover modificare i numerosi GOTO e GOSUB nel programma. 


BKILL: listing completamente assemblato 


1a PRT 

20 SM 

39 GFLAG = $F 

49 REMTOK = $8F 

SG ASAVE = $C195 

60 XSAVE = £C106 

lA) ORG £CO51 

89 W.D RKILL-1 

90 ORG $C160 

109 RKILL LDA #$FF 

119 STA $14 

129 STA £15 

139 i SAVE PRESENT BASIC HARM STA 
RT LINK 

149 LIA $302 

150 LDX $3093 

160 STA TEMP 

170 STX TEMP+1 

189 i PUT NEW MVARM START LINK IN 
199 LDA #LELBA3-LBL903/256#256 
200 LDX #LBL903/256 

210 STA $302 

220 STA €303 

239 i GET NEXT LINE NO TO BE TREA 
TED 


240 LELO@? INC $14 


2509 BNE LBLOA4 

260 INC $15 

270 i USE ROM ROUTINE TO GET ADD 
OF LINE IN $5F £ #60 

280 LBL9904 ISF $A613 

290 3 IF HI LIME BYTE = 9 THEN EX 
IT 

300 LDY #1 

210 LDA €£5F). 

320 BEO LBLOOS 

330 i GET THIS LINE NO. INTO $14 
8 €15 

340 IH 

350 LDA C£5F1.Y 

360 STA £14 

370 INY 

380 LIA ££5F)I. 1 

399 STA $15 

400 ; COPY LINE TO INPUT BUFFER D 
ELETING SPACES-EXCEPT IN QUOTES 

410 LIA #94 

420 STX QFLAG 

430 LBLOO5 INY 

440 LDA “$5F3, 

450 IF BYTE = @ THIS IS THE ENI 
OF THE LIME SO INPUT IT 

460 BEO LELBOA7 

470 3 IF ITS A QUOTE THEH TOGGLE 
THE QUOTES FLAG 

450 CMP_#34 

490 PNE LELAOG 

S00 LIA OFLAG 

510 EOR #£FF 

320 STA OFLAG 

330 LDA #34 

54M IF THE QUOTFLAG IS SET DONT 
DELETE ANYTHING 

30 LBLA96 BIT OFLAG 

360 BMI LELAGS 

SC0 3 TEST FOR SPACE & DELETE IT 
IF_FOUND 

390 CMP _#$20 

390 PER LELBOS 

(ei) + TRANSFER FIRST NON-SPACE EVE 
N IF ITS A REM 

619 CMP_#REMTOK 
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624 BHE LELAGS 
GIO CPX #4 

640 BHE LELGO2 
[ap] INA 

G6A STA $1FB.A 
era IHX 

680 LELOO2 DEX 
690 LELGA7 LDA #4 
00 THX 

710 STA $1FE.X 
720 STX $E 

730 IMP_$£A4AR4 
740 LBLO9S INX 
PSA STA $1FE.X 
760 JMP_LELAGS 
70 LBLAA9 LDA TEMP 
780 LDX TEMP+1 
790 STA £392 
200 STAX $303 
219 IMP _£R474 
220 TEMP WRD @ 
839 END 


100-120: le locazioni 14-15 sono usate dal file editor BASIC quando per qualche 
motivo lavora entro un programma. Essi vengono caricati con 255 ciascuno, in 
modo che all’inizio della routine principale l’aggiunta di uno li riporti a zero. 


130-170: durante questa istruzione chiameremo la routine di ingresso linee, che ela- 
bora una linea posta da tastiera nel buffer di input. Quando questo processo termi- 
na, la routine torna normalmente ad uno stato d’attesa di input da tastiera. Noi vo- 
gliamo che torni alla routine RKILL, quindi salviamo l’indirizzo di collegamento e- 
sistente in 302-303 (esadecimali) in modo da potervi piazzare un collegamento a 
questa routine. 


180-220: viene installato un nuovo indirizzo di collegamento che punta a questa 
routine. 


230-260: viene incrementato di uno il numero di linea su cui si sta lavorando. 
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270-280: viene usata una routine ROM per trovare l’indirizzo di quella linea in me- 
moria. Se non c’è una linea del genere, la routine restituirà l’indirizzo della linea col 
numero seguente più vicino. 


290-320: se il byte alto del byte di collegamento all’indirizzo indicato dalla routine 
ROM è zero, allora è stata trovata la fine del file e la routine termina. 


330-390: il numero della linea trovata viene prelevato e memorizzato alle locazioni 
14-15 esadecimali. 


410-420: queste linee inizializzano la routine. X sarà l’inizio del testo della linea nel 
buffer d’ingresso (ricavato dai byte di collegamento e dal numero di linea); il segna- 
le di virgolette, che registra se un carattere in ingresso è fra virgolette, viene inizia- 
lizzato. 


430-440: viene posto in accumulatore il prossimo byte della linea. 


450-460: se il byte è zero, è stata raggiunta la fine linea e viene fatto un salto alla 
routine ROM che introduce effettivamente una linea. 


470-530: se il carattere prelevato è un punto di domanda, il segnale di virgolette è 
posto uguale a zero o uno a seconda che sia il primo o il secondo segno di virgolet- 
te di una coppia. 


550-560: se il segnale di virgolette è a zero, la parte principale della routine viene 
tralasciata poiché non vogliamo interferire col contenuto delle righe fra virgolette. 


570-590: se il carattere prelevato è uno spazio, viene ignorato e si passa al successi- 
vo carattere. 


610-620: si fa un controllo sul token di REM: se il carattere non corrisponde a 
REM, viene posto nel buffer d’ingresso. 


630-680: se è stato rilevato un token di REM, si fa un test per vedere se si trova a i- 
nizio riga (il registro X è in questo caso 4). Se è così, viene posto nel file delle linee 
650-660. Altrimenti il registro X viene decrementato per puntare ai due punti pre- 
cedenti nel buffer d’ingresso. Il puntatore contenuto nel registro X punterà ora ai 
due punti precedenti il REM se il REM non si trovava a inizio linea ed alla posizio- 
ne seguente il REM in caso contrario (tutti questi si trovano comunque, ricordate, 
nel buffer e non nella linea vera e propria). 
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690-730: viene ora memorizzato uno zero nel buffer d’ingresso segnalando così la 
fine riga. La lunghezza della linea viene piazzata nella locazione B (esadecimale) e 
viene poi eseguita la routine di input, ponendo così la linea accorciata nel program- 
ma invece dell’originale. 


740-760: a questo punto tutti i test precedenti hanno fallito, così il carattere non de- 
v’essere cancellato e dobbiamo memorizzarlo nel buffer d’ingresso per poi ripetere 
il ciclo e prelevare il carattere seguente. 


770-810: è la routine d’uscita da RKILL, quindi viene ripristinato il normale colle- 
gamento con la tastiera e si salta alla routine del modo diretto, provocando così il 
messaggio ‘READY. 


820: TEMP stabilisce la locazione di memoria per il collegamento originale al ‘war- 


mstart’ (partenza a caldo o reinizializzazione del sistema), che viene salvato all’ini- 
zio di RKILL. 


RKILL: listing completamente assemblato 


add, data source code 

(1) 1A PRT 

(t] 2A SYM 

[ti] 309 QFLAG = #F 

(t) 49 REMTOK = £8F 

(fa) 50 ASAVE = £C105 
(1) 60 KSAVE = $C106 

A 70 ORG $CAS51 

COSI SFCI 29 WURD RKILL-1 
Cas? 909 ORG $CI16G 

CI6A RASFF 100 REILL LDA #$FF 
C162 2514 110 STA £14 

C164 2515 120 STA £15 

C166 130» SAVE PRESENT BASIC 


WARM START LINK 

C166 ADOZAI 149 LDA £302 

C169. FER3A3 1509 LDX £303 

CIEC SDEICI 160 STA TEMP 

C16F  BEE2CI 17 STX TEMP+1 

C172 150; PUT NEL WARM START 
LINK IH 
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C172 A97C 190 
6#256 


C174 A2C1 20A 
CI76 SI0203 210 
C179 SEG303 220 
C17C 239 
FE TREATEN 

CIFC EG614 240 
CIFE DRAG2 250 
C189 EG6IS 260 
C182 zia 


GET ADD OF LINE IN 
C182 2013A6 280 


LIA #LELBOS-LELOA3/25 


LDX #LELO03/256 

STA 202 

STA £303 

» GET NEST LIME HO TO 


LELOG3 INC £14 

BHE LELAG4 

INC £15 

USE ROM ROUTINE TO 
$5F £& £60 

LELAA4 JISR £R613 


C1SS 290; IF HI LIHE EYTE = 
THEN EXIT 

C185 ADAI 300 LIY #1 

C187 B1SF 1A LDA c£5F), 

C189 F047 320 BEO Lelpos! 

C18P 2320: GET THIS LIME MO, I 
HTO £14 & £15 

CISB C8 346 INY 

C18C B1SF 2509 LDA (£5F). 1 

C199 C8 300 INY 

C191 B1SF 380 LDA ££5F). 

C193 2515 390 STA £15 

C195 400; COPY LINE TO INPUT 

BUFFER DELETING SPACES-EXCEPT IN QUOTES 

C195 AZ204 4109 LDX #4 

C197  260F 429 STX QFLAG 

C199 (C8 439 LEL095 INY 

C198 B15F 440 LDA ££5F).Y 

C19C 450 ;IF BYTE = & THIS IS 
THE ENI CF THE LINE SO INPUT IT 

C19C FO2z2 4609 BEO LELOA7 

C19E 470; IF ITS A QUOTE THEN 
TOGGLE THE QUOTES FLAG 

C1I9E 0922 420 CMP #34 

CIAO DAG 490 ENE LELABE 

CIAZO ASAOF 5009 LIA ASFLAG 

CIA 49FF 5109 EOR #$FF 

CIAG  S5SAF 520 STA QFLAG 

CIAS A922 SCA LIA #34 

CIARA 546 (IF THE QUOTFLAG IS S 
ET DONT DELETE ANYTHING 

CIARA 240F SSA LELAAG BIT GFLAG 
CIACO 2010 560 BMI LELMAS 

CIAE S70 i TEST FOR SPACE € DE 


LETE IT IF FOUND 
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CIAE 
CIA 
C1E2 


CIZA 
FOE? 


500 CMP_#£20 
A PEG LELGAS 
609 TRANSFER FIRST NOH-S 


FACE EVEN IF ITS A REM 


ONnOonnoa 


TOTAL EFFORS 


AFLAG 
REMTOK. 
ASAVE 
ASAVE 
RKILL 
LELBA3 
LBLO04 
LELOAS 
LBLOMG 
LBLAG2 
LBLOA7 
LBLOAS 
LBL9@9 
TEMP 


CISF 
DOS 
EAM4 
DOGS 
ES 
SDFFAI 
ES 


ES 
SIFBAI 


ADELCI 


619 CMP_#REMTOK 
620 BHE LELOAS 
SO CPA #4 
64M BNE LELOOZ 
650 INA 
660 STA $IFE.K 
INK 
LELOGZ IEX 
LELGA7 LIA #0 
IN 
STA $1FE. 
ST £E 
JMP_£A4A4 
LELOAS INK 
STA SIFE.A 
JMP_LELBOS 
7A LELOGO9 LDA TEMP 
Pe0 LDX TEMP+1 
90 STA £302 
SdaA STA £303 
810 IMP £A474 
S2A TEMP WURD A 
820 END 


AANIAHIA AARON 


MUAA QNM pad 
DIRI DAL 


IN FILE --- @ 


total number of sumbola --- 14 
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Come per la routine precedente, per venir introdotto RKILL dev'essere prima 
assemblato nel vostro file generale che, a questo punto, dovrebbe consistere dell’e- 
xtender, di UNDEAD e di SUBEX. Il file dovrebbe venir salvato e poi posto in me- 
moria con il BASIC extender II. Una volta caricato il file, battere direttamente 
RKILL dovrebbe eliminare spazi e REM dal BASIC extender. 


RKILL: note sull’uso 


RKILL è un comando in modo diretto — non può venir inserito in una linea di 
programma. La ragione di ciò è che, poiché abbrevia il programma, altera i punta- 
tori usati dall’interprete. Fare questo mentre un programma è in esecuzione è una 
ricetta sicura per combinare un pasticcio, perciò RKILL termina l’esecuzione di un 
programma una volta completato (come LIST). 
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CAPITOLO 9 
IL PROBLEMA DEI PARAMETRI 


SEZIONE 1: GETWRD 


Abbiamo già notato che alcune parole chiave per azioni richiedono che vengano 
prelevate dalla linea di programma altre informazioni prima che essa possa venir e- 
seguita. Questa routine dall’aspetto insignificante realizza questa funzione per le 
nostre nuove parole chiave e dev’essere immessa nel file globale di codice macchina 
prima che noi possiamo introdurre nuove parole chiave con parametri. Il suo nome 
è GETWRD. 


GETWRD: listing in linguaggio assemblatore 


10 PRT 

zo SM 

3A CIRG $£C12C 

4A i ROUTINE TO GET 16 BIT UHSIGH 
ED INTEGER FROM BASIC INTO $14 £ $15 

312) GETWUED JSR #AISA 

60 IMP $B7F7 

ras. EHI 

ENI! 


50: la routine qui chiamata è nell’interprete standard e si limita semplicemente a 
prelevare un numero in virgola mobile dalla linea BASIC attualmente in elabora- 
zione. I numeri immessi in modo non corretto provocheranno un errore sintattico, 
come per una normale parola chiave BASIC. 
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60: questa routine trasforma il numero prelevato in un intero dell’intervallo 0- 
65535. Numeri esterni a quest’intervallo provocano un errore del tipo ‘ILLEGAL 
QUANTITY” (quantità non lecita). 


GETWRD: listing completamente assemblato 


add. data source code 
[n] 16 FPRT 
A 2A 57M 
A 39 ORG £C12C 
200 4A i ROUTINE TO GET 16 EI 
UNSUGHED INTEGER FROM BASIC INTO £14 & 
Pr 


C1IZC 205AAD 56 GETWUERD ISR £ADSA 
CIZF 4CF7E7 60 IMP $B7Fr 


C132 FA END 

TOTAL ERRORS IH FILE --- MA 
GETWERD CISCO 

total number of ssmboalza -—-— 1 


Si, questo è tutto ciò che serve. Non potete ancora fare nulla con la routine, ma i 
prossimi comandi la useranno intensamente per restituire i parametri per le nostre 
nuove parole chiave. Come le routine precedenti, dev’essere immessa nel codice 
macchina globale prima di passare alla sezione seguente. 


SEZIONE 2: DOKE 


Ora che possiamo prelevare parametri per nuove parole chiave, tutta una serie di 
nuove possibilità si apre. La prima di queste è DOKE, che semplicemente pone in 
memoria un numero compreso fra 0 e 65535 in' una locazione a due byte. Questo e- 
vita tutte le complicazioni di immettere espressioni come VAR - 256 IN- 
T(VAR/256) ogni volta che si devono mettere in memoria numeri a due byte. 
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DOKE: listing in linguaggio assemblatore 


PRT 
GETURD = $C12C 
SYM 
OIRG $CA4F 
URD DOKE-1 
ORG $C212 
DOKE JSR GETURD 
i CHECK FOR A COMMA 
JSR $REFII 
i PUT ADDRESS ON STACK WHILE 


GETTING THE DATA 


119 
120 
159 
146 
159 
160 
178 


POINTER 


120 


i GET VALUE TO EE DOKETI 
JSFE GETURD 


i PUT ADDRESS INTO TEMPORARY 


LI #15 
LIV £14 
PLA 
STA £15 
FLA 
a $14 
THA 


i USE ROM ROUTIHE TO SET TITO 


ZERO 8 PUT Di EYTE IN MEMORN 


QI Li RI RI DI DI 
HR DN 


Commento 


£E2282 
im 
THA 
STA £$140.,47 
ETS 
END 


70: ricava, per mezzo di GETW RD, il numero corrispondente all’indirizzo cui la 
cifra dev'essere immessa via DOKE. 


80-90: se non c’è una virgola dopo il primo parametro, si segnala un errore sintatti- 


co. 
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100-140: il primo parametro viene salvato sulla pila dopo essere stato prelevato 
dalle locazioni esadecimali 14-15 in cui GETWRD l’aveva posto. 


160: viene chiamata ancora GETWRD per trovare il valore da immettere con la 
DOKE. i 


180-230: il valore viene posto in X ed Y e l’indirizzo viene rimesso nelle locazioni 
14-15 esadecimali. 


240-260: il byte basso del dato da memorizzare viene posto in accumulatore, quin- 
di viene richiamata una breve sezione di ROM che mette a zero il registro Y e cari- 
ca il contenuto dell’accumulatore nella locazione indicata dai due byte che iniziano 
alla posizione 14. Si sarebbe potuto fare in quattro byte in questa stessa routine, 
ma dal momento che due istruzioni erano nella ROM con un'istruzione di ritorno 
dopo di loro, perché non usarle? 


270-330: il valore di Y viene incrementato di uno ed il byte alto del valore da me- 


morizzare via DOKE è posto nel byte al di sopra di quello in cui è stato piazzato 
quello basso. 


DOKE: listing completamente assemblato 


add. data source code 

(5) 165 PRT 

A 2A GETWURDI = $C120 

Fi SA SM 

(1) 4A OFRG £CA94F 

CA4F 11C2 SA YUPD DOKE-1 

COSI SA ORG £C212 

C212 2ZO2CC1 70 DOKE .ISR GETURID 

C215 SA; CHECK FOR A COMMA 
C215  20FIAE 99 .ISR £AEFD 

C218 1960; PUT ADDRESS DM STAC 
E WHILE GETTIHG THE DATA 

C212 AS14 110 LDA £14 

CZIA 42 120 FHA 

CZIE ASIS 1509 LDA £15 

CZ1D 48 140 PHA 

CZIE 150; GET VALUE TO BE DOK 
ED 


CZIE  ZASCCI 160 JSR GETWHED 


C221 178; PUT ADDRESS INTO TE 
MPORARY POINTER 


C221 AG1S 150 LDX $15 

C223 A414 190 LDY £14 

Ce25 62 200 PLA 

C226 8515 216 STA $15 

0229 68 2264 PLA 

C229 8514 259 STA £14 

C22B 98 240 TYA 

C22C 250; USE ROM ROUTINE TO 
SET | TO ZERO ® PUT FIRST EYTE IH MEMORY 
C220 2028E9 260 JSR #B822 

C22F CE 70 IN 

C2320 8A 220 TKA 

C231 9114 299 STA C£141," 

C2353 60 300 RTS 

C234 310 ENI 


TOTAL ERRORS IN FILE --- @ 


GETURD C12C 
DOKE C212 
total number of s4ymbole -—-- 2 


DOKE: note sull’uso 


Doke può venir usata per sostituire ogni doppio comando POKE, ma ricordate 
che se il suo argomento è un valore inferiore a 256, il byte al di sopra di quello spe- 
cificato nel primo parametro verrà azzerato, quindi DOKE 255 non può sostituire 
POKE. La sintassi corretta per DOKE è: 

DOKE «indirizzo >,<valore > 


SEZIONE 3: Plot 


Non c’è dubbio che i caratteri di controllo del cursore del Commodore diano 
una grossa flessibilità al momento di trasferire materiale sullo schermo. Cionono- 
stante vi sono casi in cui sarebbe bello poter scrivere qualcosa nel centro dello 
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schermo senza specificare una lunga lista di caratteri di controllo o stampare una 
parte di qualche stringa definita in precedenza di quei caratteri. Il nuovo comando 
PLOT vi permetterà di muovere il cursore a qualsiasi posizione con un singolo co- 
mando. 


PLOT: listing in linguaggio macchina. 


1A PRT 

2A ST 

3A GETURI = $CISC 
4A ORG £CO5E 

SA HRD PLOT-1 

ba ORG £C3DA 

FA PLOT J5SR GETWRD 
3A JSR £AEFII 

IA LIA #15 

100 EHE ISERF 

116 LDA £14 

120 CMP_#25 

136 ECS IGERF 

146 FHA 

150 JSR GETUHRI! 
160 PLA 

179 TAX 

120 LIA £15 

190 EHE. ISEFR 

ZA LION £19 

219 CPT #40 

22A ECS ISERR 

220 IMP _&FFFA 

2465 IGERR IMP £E242 
Malt EMI! 
EHI 
Commento 


70-130: queste linee ricavano il parametro per il numero di linea (posizione vertica- 
le sullo schermo). Controllate che faccia seguito una virgola e che il numero cada 
nell’intervallo 0-24. 
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140-220: il numero di linea viene memorizzato sulla pila e poi viene ricavato il nu- 
mero di colonna, che sarà controllato per vedere se è nell’intervallo 0-39. Il registro 
X verrà caricato col numero di riga ed Y con quello di colonna. 


230: chiama la routine del KERNAL che stabilisce la posizione del cursore. La 
routine del KERNAL usa i registri X ed Y per ottenere la posizione esatta. 


240 : IQERR è l’indirizzo per stampare il messaggio di ILLEGAL QUANTITY. 


PLOT: listing completamente assemblato 


add, data aourre code 

A 164 FRT 

A 2A SM 

A 3A GETMPI = EC12C 
A 4A ORG SCAOSE 
COSBO D9C3 SA WURD FLOT-1 
CASD 660 ORG £C30A 
CENA ZAZCC1 FTA PLOT JSR GETUHRI 
CID 2A0FDAE SA JSR #REFII 
CSEAO ASIS 90 LIA #15 
C2E2 DAS 16009 BHE IQERR 
C3E4 ASI4 119 LDA £14 
CIES (0919 120 CMP_#25 
CIES PEA12 130 ECS IDEFRFR 
CQEA 48 1404 PHA 

CIEBO ZAZCCI 156 I15R GETURI! 
CIEE 62 160 PLA 

C2EF AR 17A TAX 

CFA ASIS 150 LIA £15 
C3F2 I969 190 BHE IGERR 
C3F4 A414 200 LDY #14 
CIFE CAZS 219 CPY #40 
C2F8 BARI 220 BCS ISERR 


CFA 4CFOFF 2309 JMP #FFFA 
C3FD 40C48B2 240 IRERR IMP $B245 


CINA 259 END 
TOTAL EFRORS IN FILE ——-- MA 
GETUFEII CISCO 
FLOT CSA 
INERE C2FI 
total number of asmbonla ——— 2 


149 


PLOT: note sull’uso 


PLOT può venir usato per sostituire la maggior parte delle espressioni che usano 
stringhe di caratteri di controllo del cursore, sebbene questi rimangano utili per le 
mosse a posizioni relative rispetto a quella corrente del cursore. PLOT può lavora- 
re su valori come su espressioni, del tipo. PLOT X+3,Y/2. 

La sintassi corretta per PLOT è: 

PLOT <numero di righe >,<numero di colonne > 


SEZIONE 4: Delete 


Cancellare righe una alla volta può essere noioso, specialmente se si può immet- 
tere il comando DELETE per rimuovere in un attimo una serie di linee. 


DELETE: listing in linguaggio assemblatore 


1a FRT 

za i BLOCK DELETE OF LINES 
20 Sum 

40. ORG $C053 

sa URI DEL-1 

6a ORG $C400 

7a GETWED = $C12C 

2a DEL ISF GETUFI 

20 i CONYERT TO ADDRESS 

160 JSR #A613 

110 ECC ULEFR 

120 : SAVE POINTER ON STACK 
130 LDA £5F 

140 PHA 

150 LIA £60 

160 PHA 

170 i CHECK THAT A - SIGN FOLLOUS 


Faovii aovi ori mm 


[ASCII CSI GI ieri ana 
fd PP luo 


I] 
Rj 
ka] 


Z4G 
LIME 
250 
ea 
era 
2A 
290 
ZA 


Sla 


TO EE 


LIA #45 

JSR £HEFF 

i GET LAST HO, TO EE DELETE 
JSP GETHED 

JSR £A613 

ECC ULERE 

+ GET ADIFESS GF ENI CF LAST 
Si 

LI 

LI t851).4 


Hou STORE THESE EYTES IH FI 


RST LIME TO FE DELETED 


sì LI 


Bi QU 
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FLA 
STA £60 
FLA 
STA £5F 
TTA 
LDOY #0 
STA €($£5F). 7 
IH" 
TRA 
STA C85P).,9T 
i GET LINE NO. TO EE DELETED 
TH 
LDA ESP. 
STA £14 
IH 
LDA ££5FI, 7 
STA $15 
PUT ZERO INTO EASIC INPUT E 


UFFER — TELL FILE ED. TO DELETE LINE 


DAG 
S16 


SZ 


LIA #0 
STA $200 
TION UP RETUFEN STACK 
PLA 
PLA 
USE FOM ROUTINE TO DELETE L 


IMP £H4H9 


ULEFR IMP _£ASES 
EHI! 


SI 


100-110: la routine alla posizione A613 esadecimale converte il primo numero di li- 
nea prelevato da GETW RD in un indirizzo nella memoria di programma. Se il nu- 
mero di linea non viene trovato, si azzererà il flag di riporto e verrà richiamato il 
messaggio di errore ‘UNDEFINED LINE’ (linea non definita). 


130-160: l’indirizzo di linea scoperto dalla routine alla locazione A613 esadecimale 
è stato ora posto da quella routine nelle posizione 5F-60 esadecimali. Quei due byte 
vengono poi memorizzati sulla pila, dal momento che stiamo per ricavare un altro 
indirizzo di linea e non vogliamo perdere il primo. 


170-190: si controlla che un ‘—’ segua il primo numero di linea, usando la stessa 
routine che in qualche altro posto controlla una virgola, ma prima si definisce il ca- 
rattere che stiamo cercando e si salta alla routine due byte più avanti che nel caso 
precedente. 


200-230: si ricava l’ultimo numero di linea da cancellare e se ne determina l’indiriz- 
zo. 


240-300: si ricava l’indirizzo della linea seguente l’ultima linea da cancellare me- 
diante i byte di’ collegamento dell’ultima linea e lo si pone nei registri X ed Y. 


310-410: l’indirizzo della linea seguente l’ultima viene ora piazzato nei byte di col- 
legamento della prima linea da cancellare. 


420-480: la serie di linee costituisce ora, agli occhi dell’interprete, un’unica linea, vi- 
sto che i suoi byte di collegamento puntano oltre la fine della serie. Il numero reale 
della linea da cancellare si ricava ora dai due byte successivi a quelli di collegamen- 
to. 


490-510: viene memorizzato zero nel buffer d’ingresso — questo indica al file editor 
del BASIC che si deve cancellare una linea. 


520-540: una volta eliminate linee dal programma, non possiamo tornare allo stes- 
so indirizzo da cui DELETE è stata chiamata, visto che ora potrebbe essere cam- 
biato, quindi l’indirizzo di ritorno viene prelevato dalla pila ed eliminato. 

550-560: si salta alla routine ROM che cancella le linee — essendo il corretto nu- 
mero di linea memorizzato in 14 e 15 esadecimali per essere usato da questa routi- 


ne. 


570: salto alla routine di errore ‘UNDEFINED LINE’ 
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DELETE: listing completamente assemblato 


add, data source code 
fA 16 PRT 
A ZA; BLOCE DELETE CF LIME 
A Sa SM 
Fi 46 ORG 0053 
COSS FFC3 SO WPD DEL+I 
COSS 6A OFG £C400 
CCIAA FA GETHET = £C120 
C4RO ZASCCI SA DEL .J5E GETHET 
C403 90; COHVEET TO ADDFRESS 
CIG ZA1SAE 100 .ISR EA61S 
CIA SA5F 1168 ECC ULERE 
C4AS 1200: SAVE POINTER OH STH 
CE 
C4A2 ASSF 159 LIA #5F 
CIARA 42 1404 PHA 
C4IAB ASEM 150 LIA E60 
CIANI de 160 FHA 
C4RE 17 CHECE THAT A — SIGH 
FOLLOWNS 
C4IAE ASSI 156 LDA #45 
C4I6 SOFFRE 196 J5R *AEFF 
C413 20M GET LAST HO, TO EE 
DELETETI 
CLIO ZAZOCI Z16J5FE GETHRI 
C41E ZS013HE 220 ISF $AGIS 
C419 SAC 259 BCC ULEFR 
C41E 240; GET ADDFESS OF ENT 
OF LAST LIME TO BE O 
C4I1B AOAI 250 LION 
C41DO ESP 268 LIA ssa 
C4IF AA 2FA TRA 
C4SA Sa 280 DEY 
C4ZIO B1LSF 299 LDA CESF1,49 
C4z3 AQ SOA TA 
C4IZ4 2160; HOW STORE THESE EYT 
>; IH FIRST LIME TO EE DELETE 
424 62 SzA PLA 
0425 BELA 259 STA #60 
C4Z? ES 340 PLA 
C4250 2E5SF 250 STA £5F 
C4ZA 98 36A TYA 
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C4ZE  AADO 370 LIT #0 

C4ZIO 915F SR STA SESPO.N 

C4ZFO CC 390 IH 

C429 460 TA 

C431 S15F 416 STH c£5F). 

C4S3 320 GET LIHE HO. TO BE 
DELETEI! 

C433 Ca 430 INT 

C434 B1SF 440 LIA C“$5F).7 

C436 8514 459 STA $14 

C438 Ca 460 IHY 

C439 BLSF 470 LIA €£5F). 

C4SEO S515 450 STA 815 

C4SD 3499; PUT ZERO INTO PASIC 
IHPUT EUFFER — TELL FILE ED, TO DELETE 

LIME 

C4SIO ASOO SA LIA #0 

CISFO SIGAGZ S1A STA E200 

C4IIZ Se; TION UP RETUEH STAC 

È 

C442 69 239 PILA 

C4I4S EE 240 PLA 

(434 SoS USE ROM ROUTINE TO 


DELETE LINE 
C444 4CH4A94 S69 IMP £R494 
C447 4CE2AZ SC ULEFER JIMP_ £ASES 


Fon SCA ENI 
TOTAL ERRORS IN FILE --- @ 
GETWED c12C 

DEL C4GA 

ULERE C447 

total number of sumbola --- 3 


DELETE: note sull’uso 


Come ogni comando che altera la struttura di un programma, anche DELETE 
può creare problemi se usato durante l’esecuzione di un programma, così il pro- 
gramma termina quando esegue una DELETE. DELETE verrà usato normalmen- 
te in modo diretto, ma può essere usato come dispositivo di sicurezza nei program- 
mi, ad esempio per rimuovere linee che non volete vengano esaminate, se viene pre- 
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muto il tasto STOP. Difatti, DELETE è più efficace nel proteggere un programma 
che ad esempio NEW ora che è disponibile UNDEAD. UNDEAD non può ripri- 
stinare le linee cancellate con DELETE, poiché sono già state riscritte. 

La sintassi corretta per DELETE è: 
DELETE «prima linea da cancellare> — <ultima linea da cancellare > 


SEZIONE 5: BSAVE 


Ora che, come speriamo, state appassionandovi alle meraviglie che è possibile 
realizzare con il codice macchina, desidererete presto poter salvare blocchi di me- 
moria senza dover passare attraverso il monitor del programma Mastercode. In 
questa e nella prossima sezione presentiamo tre nuovi comandi che permetteranno 
di salvare, verificare e ricaricare in seguito una qualsiasi zona di memoria. Senza 
fare altre considerazioni, questo è un modo semplice per caricare routine macchina 
in memoria. 


BSAVE: listing in linguaggio assemblatore 


16 FRT 

za GETHRI = $CISC 
vis) Sti 

de ORG £CO65 

si) WEI ESAN 

ba CR £C254 

Fa ESAVE JISE £E1094 
SA ISF £REFI 

2A ISF GETHED 

166 LDA £14 

Lia FHA 

120 LIA #15 

156 FHA 

145 JSFR £HEFII 

159 JSP GETHED 
166 LIK £14 

15 LINO £15 

150 FLH 

190 STA £15 
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zAA FLH 
Zia STA £14 
SZ LDA #£14 
220 IMP $E15F 
240 EMTI 

EMI 


70: si usa una routine del KERNAL per prelevare tutti i parametri di un normale 
comando per file cioè nome, dispositivo ed indirizzo secondario. 


100-140: l’inizio dell’area di memoria da salvare, prelevato da GETWRD, viene 
messo in pila. 


150-210: l’indirizzo finale dell’area viene caricato nei registri X ed Y, l’indirizzo ini- 
ziale viene recuperato dalla pila e rimesso nelle posizioni 14-15 esadecimali. 


220-230: viene caricato in accumulatore 14 esadecimale, per specificare l’indirizzo 
contenente l’indirizzo d’inizio del blocco di memoria da salvare. Il salvataggio, in sé 
è realizzato dalla stessa routine del KERNAL che esegue tutti i salvataggi da BA- 
SIC. 


BSAVE: listing completamente assemblato 


add. data source code 

1A FET 

2A GETWHRD = £C12C 
SA SY 

4A ORG £C0ES 

SA WIRD EBSAVE-1 

6A ORG £C034 

A ESAVE JSR £E104 
SA ISE £AEFN 


9A ISE GETWFTI 
100 LIA #14 
110 PHA 

120 LIA £15 


C2420 4 156 PHA 
C243 2AFDAE 146 .ISR E£MEFII 
CEZ460 SAZOCI 156 ISF GETHET 
C249 AGII 160 LI 14 
CZ46E0 A4IS 1FO LINO £15 
C240, 65 156 PLA 
- SSL 196 STH $15 
lata ZA FLA 
514 ZIO STA £14 
R9149 225 LIA #£14 
4CDFEI 200 IMP £E15F 
2408 ENTI 
TOTAL EFFORS IH FILE ——— GM 
GETHET DISC 
ESANVE Da 
total number of ssmbola eee 2 


BSAVE: note sull’uso 


BSAVE richiede sempre un indirizzo secondario, che normalmente sarà 2. L’o- 
missione dell’indirizzo secondario produrrà un SYNTAX ERROR. Notate anche 
che non c’è controllo sul fatto che l’indirizzo finale sia effettivamente seguente quel- 
lo iniziale. 

La sintassi corretta per BSAVE è: 

BSAVE <“nome file” >, <dispositivo >, <indirizzo secondario >, <inizio dell’area 
di memoria», <fine dell’area di memoria > 


SEZIONE 6: BLOAD e BVERIFY 
Una volta salvata un’area di memoria su nastro o disco, sarebbe bello poterla re- 


cuperare. Questo è possibile con il comando BLOAD. Quasi la stessa routine che 
esegue BLOAD può venir usata per eseguire BVERIFY, che controlla se un’area 
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di memoria è stata salvata correttamente confrontando ciò che è stato salvato con 
l’area da cui è stato tratto. 


BLOAD/BVERIFY: listing, in linguaggio assemblatore 


16 FRET 

ia) Si 

ZA GETWED = ECLEC 
dA CIRG £C061 

dA WED ELCAD-1, EVER-1 
6 ORG $C2F2 

Gi EVER LIA #1 

FA ET £2C 

(eta) ELOAI LIA #0 
FA STA £A 

166 JSR £E1I4 

119 JSR £AEFI 

120 JSR GETURI 
159 LOA A 

140 LD #14 

15M LI #15 

160 IMP FEL7S 

179 END 
EHD 


100-160: è il nocciolo della routine e le due sezioni precedenti possono venir com- 
prese solo dopo questa. Le linee saltano alla routine KERNAL che ricava i para- 
metri per il file e chiamano GETWRD per ottenere l’indirizzo d’inizio dell’area di 
memoria in cui dev'essere caricato il codice salvayto. Il contenuto originale dell’ac- 
cumulatore, che indica se dev’essere eseguito BLOAD o BVERIFY, viene ripristi- 
nato col risultato di GETWRD e viene chiamata la routine del KERNAL per il ca- 
ricamento. 


60-90: queste linee determinano il valore nell’accumulatore quando viene chiamata 
la routine di caricamento: 1 indicherà una verifica e 0 un caricamento. Se viene 
chiamato BLOAD, nell’accumulatore viene caricato uno zero. Se invece viene 
chiamato BVERIFY, si carica 1 nell’accumulatore e il byte seguente del program- 
ma (messo li da una direttiva BYT assembler) viene interpretato come codice ope- 
rativo di un’istruzione a tre byte con i due byte dell’istruzione LDA#0 come ope- 
rando. Tutto ciò è ovviamente privo di senso, ma l’istruzione che viene riconosciuta 
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è un test su un bit che non provoca modifiche se non su un paio di flag della CPU 
che noi non usiamo. Ciò significa che l’istruzione in linea 60 viene superata molto 
più velocemente ed economicamente che se si fosse fatto un salto — l’istruzione 
scompare semplicemente quando è affrontata in questo modo. 


BLOAD/BVERIFY: listing completamente assemblato 


add, data acunze code 
Hi 1A PET 
Fi SA SYM 
E 25 GETYED = EC1L20 
FA SA 0EG ECA6I 
CR6I  F4ACSFi 46 LETI BLOATI-1, EVERC1 
CREeS SA ORG £CSF= 
CEF2 ASA 6A EVER LDA #1 
CFA SC FA EYT £2C 
CEF5 O AZOO SA BLOAD LDAP #6 
C2FPo GSO ZA STA £A 
CZF9 2604E1 1060 .ISR £E104 
CEFC SAFDAE 1169 .I5SE «AEFIl 
CZFFO SASCCI 126 ISEE GETHED 
CORSO ASSA 1569 LIA £H 
304 MEl4 1460 LD £14 
GE AI1IS 150 LIV £15 
AS 4CF5E1 160 IMP £E175 
DE 17 ENI 
TOTAL ERRORS IH FILE --- MA 
GETHED CIZC 
EVER C2F2 
ELCAD C2FS 


total number of s4umbola —-- 


BLOAD/BVERIFY: note sull’uso 


Ancora una volta si deve usare un indirizzo secondario, che dovrebbe essere ze- 
ro. BLOAD ricaricherà a partire dall’indirizzo in memoria da voi specificato. BVE- 
RIFY verificherà l’area di memoria corretta, non importa quale indirizzo immettia- 
te — comunque è necessario un indirizzo fittizio. 
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La sintassi corretta per BLOAD è: 


BLOAD <“nome file” >, <dispositivo >, <indirizzo secondario, = 0 >, «inizio del- 
l’area in cui caricare > 


La sintassi corretta per BVERIFY è: 
BVERIFY <“nome file” >, <dispositivo >, <indirizzo secondario, = 0 >, <valore 
fittizio >. 


SEZIONE 7: MOVE 


Quello che state per immettere, sebbene a prima vista possa sembrare un po’ 
scialbo, è uno dei comandi più flessibili che si possano aggiungere al BASIC. MO- 
VE vi permette di specificare un’area di memoria e quindi spostarla indicando un 
nuovo punto d’inizio per quel blocco di memoria. Notate che le aree non vengono 
scambiate fra loro, al termine avrete due copie del blocco originale. Il comando può 
servire ai programmatori in linguaggio macchina che desiderano rilocare una routi- 
ne senza doverla salvare e ricaricare. Può anche essere usata per manipolare lo 
schermo copiandone aree da un luogo ad un altro. La routine è più lunga della me- 
dia fin qui incontrata, ma è veramente molto semplice come esecuzione. 


MOVE: listing in linguaggio assemblatore 


16 FRT 
ze GETURI = $C12C 

20 Sum 

4A ORG #C055 

sa URD MOYE-1 

ga ORG #C30E 

ra ELOCK MOVE OF MEMORY — HO PR 


OTETCION AGRINST MOVING VITAL SECTIOHS 
2A i SYHTAZX OF COMMAND “NOVE B1.A 
DL* 
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da i WHERE Al = ORIGINAL ADDRESS 
106 ! MS = FIHAL AIDFESS 
116 LO = LEMGHT fIFO ELSE, 
126 + ALSO MHOTE S2E ELOCES MAX 
136 MEWADI = £61 

146 OLDADI = HEMHADT+S 

159 LEHGHT = £14 

166 SUEROUTIME TO DECREMENT & T 
EST LEHGHT 

170 DECLEH LDAP LEHGHT 

156 EHE LELBBA 

196 DEC LENGHT+1 

AO LELGGG DEC LENGHT 


LIA LEHGHT 

SEA LEHGHT+1 
RTS 

i MRIH EGUTINE 
MOVE JISR GETHETI 
LIA $£14 

PHA 

LIA FIS 

FHA 

ISF £HEFI 

JSFE GETWRET 

LIA £14 


LIA £15 


JEF $MEFII 
JSR GETHET 
DECIDE UHICH DIFECTIOH TO M 


396 LDY #3 

406 LELBGI FLA 
d1A STA HEWADI.* 
420 DE 

450 EFL LELGA1 
440 LDA LENGHT 
450 ORA LENGHT+1 
460 PES LELOGZ 
4FA LIA HEMATIT+1 
450 CHF OLDADI+1I 
490 ECC MVEDUH 
SARA BHE MVYEUF 
ps, LDA NEWADD 
SLA CMFOLDAND 


30 BCC MVEINMH 


540 i MOVE BLOCE UFWARDS IH MEMOR 


DA 
SIA MVEUPO CLI 
batt CLIC 
SA LIA HENATIT 
Sl ADCO LEHGHT 
SIA STA MEMATDII 
Goo LIA MHEDHATTÒ®1 
EL ADO LEMGHT+1 
[opa STA HEMADIH+1 


BRIO 

LORO CL DATI 

ANO LENGHT 

STA OLDADI 

LIA OLDADITIÀ1 

ADO LEMGHT+1 

STRO OLDATIT+1 

LINE 

LELOGS LIA SOLDADIO. 
STA CHENADIOG.T 

THA 

EHE LELA4 

DEC OLDAND1 

DEC HEWADIK+1 

LELOG4 DE" 

JSP DECLEH 

EHE LELOGS 

LELOA? RTS 

i MONE BLOCE DOM THE MEMORY 
MVEDMH LIM #6 

LELBGS LIA COLDADII.H 
STA CMEMADII. + 

TH 

EHE LELOGE 

IHC OLDADI+1 

IHC MEWADD+1 

LELAGE .ISR DECLEH 

BHE LELAGS 

ETS 


==, di; È 
DS Gina 


mani 


ATUALLINMS TION L 
Sh Si DE DA 


ni 


di RI DI 


1D LD CO 0 00 0 00 20 00 00 00 DI di AA a a Ti 


++ TR) LO 
AOC RE AC RE ATO OO SIE ACEA RI IONE APC RIO) 


EHI 
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Commento 


160-230: quando specificate un’area di memoria da spostare con MOVE, ovvia- 
mente essa avrà una certa lunghezza. Lo scopo di queste linee è di decrementare 
una variabile chiamata LENGTH per tener conto di quanta parte del blocco è sta- 
ta finora trasferita. LENGTH è in realtà una variabile a due byte e le linee control- 
lano se il byte basso è zero per decidere se decrementare solo il byte basso oppure 
entrambi — vengono decrementati entrambi se il byte basso vale zero per rappre- 
sentare un riporto. 


240-370: i tre parametri per l’indirizzo d’inizio, fine e nuovo inizio vengono ricavati 
da GETWRD. 


380-530: prima di eseguire una MOVE dobbiamo sapere se la destinazione è su o 
giù lungo la memoria. Se è ‘giù’ (cioè negativa in termini di indirizzo) dovremo ini- 
ziare a copiare l’area dal basso in modo che se le due aree si sovrappongono, al 
momento del contatto fra area di destinazione ed area sorgente non ci sia più biso- 
gno dei dati all’inizio dell’area sorgente. Vale l’opposto quando l’area di destinazio- 
ne è precedente in memoria rispetto all’area sorgente. Quindi se desiderassimo spo- 
stare un blocco di memoria di un byte più avanti inizieremmo a trasferire un byte in 
avanti l’ultimo byte dell’area sorgente. Cominciare all’inizio dell’area sorgente si- 
gnificherebbe che il primo byte verrebbe posto nella locazione del secondo, poi il 
secondo in quella del terzo e così via copiando lo stesso carattere nell’intero blocco 
di destinazione. Le linee fra 470 e 530 eseguono un confronto a 16 bit fra i due in- 
dirizzi iniziali e saltano a MVEDWN se l’indirizzo di destinazione è inferiore all’in- 
dirizzo iniziale sorgente, altrimenti si esegue MOVEUP. 


550-690: è l’inizio della routine per spostare un blocco in memoria verso l’alto. 
Queste linee ricavano gli indirizzi finali di ciascun blocco e li memorizzano in NE- 
WADD ed OLDADD, che hanno in precedenza contenuto gli indirizzi iniziali. 


700-800: usando il registro Y per indicizzare MOVE, queste linee iniziano a spo- 
stare i byte dall’indirizzo specificato in OLDADD più il contenuto del registro Y 
all'indirizzo specificato da NEWADD più il registro Y. Il registro Y viene decre- 
mentato ad ogni trasferimento ed ogni volta che il contenuto di Y raggiunge zero i 
byte alti di OLDADD e NEWADD vengono decrementati di uno per accedere ad 
un nuovo blocco di 256 byte. Dopo ogni decremento del registro Y viene eseguito 
un salto alla subroutine DECLEN, che stabilisce se è stato trasferito l’intero bloc- 
co. Se si, verrà posto a zero il flag di zero e si raggiungerà la linea 800, terminando 
la routine. 


163 


810-910: questa è la routine che sposta un blocco verso il basso. È più semplice 
poiché il contenuto di NEWDADD ed OLDADD può essere lasciato puntare all’i- 
nizio dei rispettivi blocchi. Oltre a questo, la sola vera differenza fra le due routine è 
che il registro Y viene incrementato e non decrementato. 


MOVE: listing completamente assemblato 


ca 

(ra 
DI 

D 


dA, data souere code 

FET 

2A GETYUED = €0120 

Sao SYM 

A di ORG £CO55 

1FCO SA DRD MOVE 

SAOORO £CHAE 

CSAE PAG; BLOCE MOVE 0F_MEMOEN 
_ NO PROTETCIOH AGAITHST MONITHG VITAL SE 

STIOHS 


MALA IA 
sd 
SEGR 


SO; SYNTAX OF COMMAND “NM 


S6 o UHERE RI = ORIGINAL 


100 |; AS = FIMAL AT 
Si 308. 118; L = LEHGHT OF 


126: ALSO MOTE 32K ELCCK 


30 HEWADN = #€1 
40 DLDADI = HEWATT+2 
59 LEMGHT = #14 
60 ; SUEROUTIME TO DECRE 
VENT 8 TEST LEMGHT 
AS14 7A DECLEM LIA LEHGHT 


wa} 
= 
DA 


SA BHE LELOGE 

DEC LEMGHT+1I 
LELAGG DEC LENGHT 
LIA LEHGHT 

CORR LEHGHT+1 

AOPTE 

MATH ROUTIHE 


DIGG a di s pa 
dI 
Berg Aoa | 


PAR A 
Di 


= 
ia! 


SAZCC1 MOVE JSR GETUHRD 
ASI4 LIA #14 

45 A_PHA 

AGIS LOA £15 

4E 36 PHA 


ZAFIAE 


JSE £AEFT! 
JSE GETLED 
DECIDE WHICH DIRECT 


VE IH 
Aa 290 LIV O #0 
ni 406 LELOGI FLH 
SELAO 416 STA NEMADILY 
n 420 DES 
430 EFL. LELOGI 
446 LIA LEHGHT 
450 ORA LEMGHT+I 
460 FEO LELOA? 
Fi LDA MEWADI+1 
4656 CMP_OLDADITI 
490 ECC MVETIMH 
SAG EME MYEUF 
Sie LOP MEHATDT 
526 CMPOOLDEDTI 
Sui BCC MYVETIIH 
346 MOVE ELOCE UPUARIS 


ù 
Nnap-em'oaon D 


DEI 

ISQATATA 
Ma I 

made TT 


ia Ti 4 Ja RIT LI DD 
fa 
i 


AIDIC 
FIERE ICE] 


00 De \dpn D 


So MVEUP CLI 

ba] CLO 

Sd L0A HENRDD 
SEA ADC LENGHT 
É 

È 


dA 


596 STA HEMANTI 
500 LIA NEWADI+1 
610 ADE 


de LO CLDRDIT 
GR ATC LEHGHT 

STA 0LDATT 
mR OLDADI+1 
= 


IR COMET 
OI. 


EME LELEHIS 


di 


Dad a 
de 
ni 


Pi 


MEMOR* 


C37 


(na ERA A] 


anna non DI 
o SaR nd 3 


DD na 


T 


TOTAL EFEORS 


GETWETI 
HEDADIT 
OUDADTI 
LEHGHT 
DECLEH 
LELANA 
MOVE 
LELOOI 
MEU 
LELBAS 
LELAA4 
LELBGZS 
MV'ETIMH 
LELOGS 
LELOGE 


Dex xe i Beet o Doe 


++ i Dod Ji in 


iN 


ADD GDO DI 


È 


LD 0 DO te CO 0 


pai 
at 


DECO OLDTADIS+I 
DEC HEMADT+1 
LELEBGA DEV 
JSP DECLEH 
EHE LELGOS 
LELOGZ FTSE 
MOVE BLOCE DOH THE 


(REACCREARE) 


Ei 
Dn 


MVEDDH LOY #0 
LELGBAS LORA COLDADIO. A 
STA SHEMADTO.* 
TH 
EHE 


UL] 


n Jo a n pa 


LELBGE 

THO QUDADD+1 

IHO HEWADI+1 
LELAGE TSE DECLEH 
EHE LELAGS 

RTS 


i 9 AD 00 =] 3] 


IN-FILE ---.W 


ui 


Anodi 4 nn 
Sia 


ca rage Roe REN rp Ser RI) 


t 
pie Leo. 
UCI 


ì 


total number of £ 


MOVE: note sull’uso 


L’uso di MOVE è abbastanza evidente, ma ricordate che non c’è protezione se 
fate qualche stupidaggine, tipo scrivere accidentalmente sull’interprete (quando è in 
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RAM) o su variabili di sistema o nell’area di programma o... Assicuratevi di sapere 
cosa state trasferendo e cosa c’è nel punto di destinazione PRIMA di fare il movi- 
mento. 


La sintassi corretta per MOVE è: 
MOVE «indirizzo destinazione», <indirizzo di partenza >, <lunghezza > 


SEZIONE 8: FILL 


Dopo aver progettato MOVE, il logico sviluppo era FILL, che viene usata per 
riempire una specifica area di memoria con un certo valore. Può venir usata per pu- 
lire aree di memoria, aree dello schermo, per cambiare le caratteristiche cromatiche 
dello schermo riempiendo parti del file attributi. Il vero lavoro è compiuto da una 
chiamata alla routine MVEDWN in MOVE, quindi non c’è molto da spiegare sul 
funzionamento del comando in sè. 


FILL: listing in linguaggio assemblatore 


16 PET 

DA SM 

ZA ORG £CH67 
IA YED FILL=1 
SA GETWED =: 
GA MV'EDIMH = 
FA DECLEH = 
2A MEG £0392 
FA FILL J5R GETWHED 
166 LIA £14 
116 FHA 

12M LIA £15 
126 FHA 

146 JER £REFII 
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156 JEF GETHEI 
166 LIM £14 
17 PHRA 
166 LIA £15 
190 FHFI 

CHO JESR £BREFI 
215 JSR GETUHRI! 
220 LDA £15 
220 EHE IQERR 
240 LIA £14 
256 FLFA 
26 STA £#150 
2 FPLH 
SA STA £14 
290 PLA 
AA STA #62 
ZIA STA £64 
az FLA 
SOA STA £61 
346 STA £63 
250 INC £61 
I6A BME LELAQA 
370 IMC £62 
380 LELOGG LDOY #0 
390 TAR 
4A STA CELIO." 
410 JSR DECLEN 
4ZA EEG EXIT 
400 IMP MVEDVH 
440 ISERR IMP £B242 
450 EXIT RTS 
46 END 

END 

Commento 


100-230: queste linee ottengono i tre paramentri dell’indirizzo iniziale, della lun- 
ghezza e del valore da porre in ciascun byte del blocco. Viene generato un errore 
del tipo ‘ILLEGAL QUANTITY” se il valore da caricare è maggiore di 255. 


240: il valore da salvare nel blocco viene posto nel registro X. 
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250-280: la lunghezza del blocco è memorizzata nelle locazioni 14-15 esadecimali, 
dove la routine move si aspetta di trovarli. 


290-370: l’indirizzo d’inizio viene posto in OLDADD e l’indirizzo iniziale più uno 
in NEWADD. 


380-400: il valore da usare nel riempire il blocco è posto nel primo byte del blocco. 


410-420: la lunghezza è decrementata di uno e se la lunghezza era solo uno la rou- 
tine termina: 


430: chiama MVEDWN. Se ricordate qualcosa del commento su MOVE saprete 
che spostare un byte verso l’alto in memoria implica una chiamata a MOVEUP. 
Chiamare MOVDWN allo scopo ha la tremenda conseguenza di rovinare proprio i 
byte da trasferire, riscrivendo costantemente il byte uno nel byte due, il due nel tre e 
così via riempiendo l’intera area con lo stesso valore. 

In MOVE sarebbe stato un disastro, mentre è proprio ciò che vogliamo in FILL. 


FILL: listing completamente assemblato 


add, data source code 

A 1A FRT 

A ZA SYMm 

A SA ORG £C067 

CRA7 9103 4A LRD FILL-1 
CAEIS SA GETMLED = £C15C 
COEA 6A MVEDUH = E£C37F 
CREIS FA DECLEH = £C230F 
CAES SA ORG sC3927 

1292 2092001 909 FILL .ISP GETURD 
C395 A514 100 LIA $14 

C397 42 110 PHA 

CIS9S50 ASIS 120 LIA Z153 

C359A 42 150 PHA 

CI9E 20FDIFE 146 .I5E #MEFD 
COSE 202CC1 150 SE GETWHEO 
CI3AL1 ASI 166 LIA £14 

CIA3 48 17A PHA : 

CIA4O ASIS 120 LDA Z15 

CAS 42 1504 FHA 
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CIA? ZA0FDAE 200 ISF $AEFI 
CSRA ZA02CC1 216 JISR GETWRD 


CSADO ASIS 220 LDA $15 
CSAFO DGZ5 2209 PENE IGERE 
CIBI AG14 249 LIO £14 
CIBI 68 250 FLA 

CIB4 S515 260 STA $15 
CIE6 6a “7A PLA 

CIB7 8514 220 STA £14 
CIBI 62 290 PLA 

CIEPA 2562 Soa STA $62 
CIBO 8564 210 STA $64 
CIPE 68 se PLA 

CISPF SS61 339 STA $61 
CICLO 8563 246 STA $63 
CIC3 EG6GI 350 INC $61 
CICI DAB? 360 BNE LBLARA 
CIC? E662 37 INC $62 
CIC9  AGGO 389 LBLOOO LDY #0 
C3CB 8A 399 TKA 

CICC 9163 IAA STA £(£63).4 
CICE 200BC3 = 410 JSR DECLEN 
C3DI FADE 420 BEO EXIT 


CI03  4C7FC3 430 JMP MVEDUN 
CI06 404882 440 IRERR IMP $B248 


C209 60 450 EXIT RTS 

CIDA 460 END 
TOTAL ERRORS IN FILE --- 8 
GETHRD C12C 
MVEDIHH CIFF 

DECLEH CIME 

FILL C392 
LELOGA CICI 

IQEFF CID6 

ERIT CID9 


total number of symbols ___ 7 


FILL: note sull’uso 


Ancora una volta, il comando non protegge dalle stupidaggini. 
La sintassi corretta per FILL è: 
FILL «indirizzo iniziale>, <lunghezza >, <valore del byte> 
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SEZIONE 9: RESTORE 


Potreste pensare, vedendo il titolo della sezione, che siamo usciti di senno. Non 
c’è già un comando RESTORE nel BASIC normale? La risposta è ovviamente si, 
ma una delle possibilità affascinanti aperte dallo spostamento dell’interprete in 
RAM è che non solo possiamo aggiungere nuovi comandi, ma anche cambiare 
quelli esistenti. 

RESTORE è un candidato principe a questo cambiamento. La normale routine 
di RESTORE risale al tempo in cui i computer erano conservati in grandi sale con 
aria condizionata e leggevano i loro programmi e dati da schede perforate. Ora il 
fatto è che con una pila di schede potete solo leggere dall’inizio. Se volete trovare la 
scheda n. 97, dovete iniziare dalla uno e leggervi tutte le 96 schede che non vi inte- 
ressano. Non c’è alcun.motivo per cui debba essere così anche su un moderno mi- 
crocomputer, tuttavia pare che si sia radicata la convinzione che l’unico modo di 
trattare le frasi DATA sia quello di cominciare all’inizio e proseguire fino al punto 
voluto. 

In questa sezione modificheremo il normale comando RESTORE in modo che 
possiate ripristinare un numero di linea specificato e prelevare il primo dato che se- 
gue DATA (il normale comando RESTORE può venir usato ancora se necessa- 
rio). In questo modo potete ordinare i vostri dati in tabelle separate e saltare esatta- 
mente alla tabella che volete, risparmiando considerevolmente tempo per accedere 
a singoli elementi di frasi DATA rendendo inoltre il funzionamento del vostro 
programma più trasparente. 


RESTORE: listing in linguaggio assemblatore 


16 PRT 

145) SM 

30 ARG £C132 

40 i ALTER TO RESTORE TO LINE NOS 
‘5a i TO USE TRANSFER FROM TO FAMA 


ND ALTER RESTORE VECTOR TO “START-17 


(215, i RESTORE VECTOR AT ERO022 
tas GETUED = £C1ZC 

2A START LDA #0 

20 STA £$14 
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Ma iQN- 


LE NN JI 
OO IIIIIZTAZIIANA 


ca 


Rf 


+4 


INI ar 


TT 


MI 
Np 
Do 


26A 
270 
280 
299 


ENI 


Commento 


80-100: inizializzazione della locazione in cui l’interprete memorizzerà poi un nu- 
mero di linea. 


110-150: la chiamata a subroutine preleva il carattere successivo del testo BASIC 
e le altre linee supportano il puntatore di testo che è stato ora posto nella posizione 


STA #15 

JSF_ E73 

LDA 7A 

PHE LELAMA 

DEC £7E 

LELOQO DEC #rA 
ECS LELMAI 

JSFR GETHERD 
LELMO1 JISR #A613 
LDA #14 

ORA #15 

BEG LELAA2 

BCC ULERR 
LBLA92 LDA 35F 
LI £60 

SEC 

SEC #1 

IMP _£A224 

ULERR IMP £ASES 
ENI 


seguente a quel carattere. 


160: se il carattere prelevato dalla routine alla locazione 73 esadecimale è una ci- 
fra, verrà posto uguale a uno il flag di riporto. Se non lo è, viene fatto un salto oltre 
GETWRD, poiché la routine supporrà che debba venir eseguito un normale RE- 
STORE e non si debba reperire alcun numero di linea. Se desiderate usare un’e- 
spressione dopo RESTORE dovrete precederla con 00+ o con 01* in modo da as- 


sicurare la chiamata a GETWRD. 
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180: questa routine trova l’indirizzo del numero di linea ottenuto da GETWRD o, 
se GETWRD non è stata chiamata, della prima linea nel programma BASIC. 


190-210: se l’area di memorizzazione del numero di linea contiene zero, si suppone 
che sia stata eseguita una RESTORE normale e non si fanno controlli sui parame- 


tri. 


220: se, al ritorno da A613, il flag di riporto è a zero, il numero di linea referenziato 
non è stato trovato e viene segnalato un errore di tipo ‘UNDEFINED LINE’ 


230-270: l'indirizzo della linea trovata viene prelevato dalle locazioni esadecimali 
SF-60, da esso viene sottratto uno e l’esecuzione torna alla normale routine di RE- 


STORE, col puntatore ai dati però rivolto ora alla linea specificata. 


RESTORE: listing completamente assemblato 


I del " 
A 


A 
0%) 
C132 


data 


LIME NOS, 


CIS 


source code 

14 PRT 

20 SY 

39 ORG $£C132 

40: ALTER TO RESTORE TO 


SA; TO USE TRANSFER ROM 


TO FAM AND ALTER FESTORE VECTOR TO “STAR 


A9AB 
514 
9315 
297209 
SSA 
DAD 
CE7E 
CEF7A 
EAA2 
ZAZCCI 
2013A6 


GA ; FESTORE VECTOR AT $A 


FA GETURD = $C12C 
89 START LIA #0 

94 STA #14 

100 STA £15 

110 SR #72 

120 LDA 7A 

159 EHE LELAGG 

140 NEC £7E 

159 LELOQA DEC $7A 
169 BCS LELAGI 

170 JIJ5FE GETUEI! 

1299 LELOG1 SR sA6I3 
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C14B AS14 190 LDA £14 

C14D G515 200 DRA $15 

C14F FAO? 219 BEG LELBBZ 
C151 SAGA 22A BCC ULERR 

C153 ASSF 234 LBLAB92 LDA $5F 
C1ISS A4G6A 240 LDY $60 . 
CIS? 29 259 SEC 

C158 ESD 260 SEC #1 


CISA 402488 270 IMP $RA924 
C1ISD 4CE3A8 290 lLERR IMP £A8E3 
C16O 299 ENI 


TOTAL ERRORS IN FILE --- @ 


GETWRD C1IZCO 
START C132 
LBLAGA C141 
LELOGI1 C148 
LBL902 C153 
ULERR C15D 
total number of symbols --- 6 


RESTORE: note sull’uso 


RESTORE può venir usata normalmente se non si specifica un parametro o si 
pone zero come parametro. Una limitazione è che la RESTORE estesa lavorerà so- 
lo su parametri di più di una cifra. Se desiderate ripristinare una linea con numero 
inferiore a 10, dovrete aggiungere uno zero iniziale al numero. 

La sintassi corretta per RESTORE è, nella forma estesa: 

RESTORE numero di linea di almeno due cifre. 

Prima di usare la RESTORE estesa si deve eseguire un’ulteriore modifica al pro- 

gramma BASIC Extender II. Si devono aggiungere le seguenti linee: 


250 REM ALTER RESTORE VECTOR 
251 POKE 40996,49: POKE 40997,193 


La routine in linguaggio macchina dovrebbe essere assemblata nel file macchina 
dell’estender e delle nuove routine e quindi caricata in memoria usando il program- 
ma BASIC extender II appena modificato. 
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CAPITOLO 10 
FUNZIONI BASIC 


Le funzioni BASIC, come ricorderete, ricevono da parte dell’interprete un tratta- 
mento separato, essendo identificate durante l’esame di un programma, dal fatto 
che esse occupano un ben specificato segmento della tavola delle parole chiave. La 
principale differenza fra le parole chiave per azioni e quelle per funzioni è che le 
funzioni richiederanno la valutazione di qualcosa, per cui c’è un’intera serie di rou- 
tine interprete speciali. Di fatto circa la metà dell’interprete è dedicato al problema 
di valutare espressioni in un modo o nell’altro. L'esecuzione di una parola funzione 
non è semplicemente una faccenda di salti a singole routine macchina in memoria. 

La routine macchina data qui, sebbene corta, usa routine dell’interprete che sono 
di gran lunga più complesse che quelle usate dalle parole azioni. Se queste routine 
non fossero già presenti nell’interprete sarebbe stata un’impresa enorme definire 
nuove funzioni. 


Valutatore di espressioni esteso: listing in linguaggio assemblatore 


1a PRT 

za SM 

3a ORG £C44A 

49 i EXTEND E#PRESSION EYVALUATOR 
DIA i TO USE POKE $AFAA MITH “.JMP 
FUNENL 

6A FUNEVL CPX #$9F 

la”) BCC LBLOA2 

(214) CPA #$989 

920 ECC LELOBI 

100 CPA #£9F 
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119 PCS LELMOI 


120 JISR $REF1 

159 PLA 

146 TAX 

150 CFA #$95 

160 BEO DEEK 

179 CP #52A 

120 BEO YP0S 

199 EHE VARPTR 

2AO LELAO1 IMP $sAFBI 
ZIA LEL992 IMP $AFDI 
22 VARPTR LDA 72 
2309 LDY 71 

240 LBL©GS ISR $B291 
ZIA LIA $66 

260 BFL LELGA4 

270 LIV #CO0HST256 
250 LDA #CONST-CONST/256#256 
290 ISR £ERSC 

300 JSR £BS6A 

310 LELAB94 IMP $ADSEI 
320 YPOS SEC 

ZIA JSR_$FFFO 

340 TAR 

350 TA 

Sea LDA #30 

370 JMP_LELABS 

200 + PERFOEM DEEK 
290 DEEK JSR $B7F7 
400 LDY #1 

410 LDA €«$£14),4 

420 PHA 

430 DE 

440 LDA €$14). 

450 TAN 

460 PLA 

470 IMP LBLOA3 

4830 CONST BYT 145,0.,0,0.0 
490 END 
END 


60-70: controlla se il token è quello di una normale funzione numerica. In questo 
caso si chiama il valutatore normale. 
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80-110: si controlla se la funzione il cui token è nel registro X è nell’intervallo delle 
nostre tre nuove funzioni, altrimenti si chiama il valutatore di stringhe funzioni. 


120: questa routine dell’interprete valuta un’espressione fra parentesi, cioé l’argo- 
mento della funzione. 


130-140: il valutatore di espressioni chiamato nella linea precedente pone il token 
sulla cima della pila. Ora viene recuperato e memorizzato nel registro X. 


150-190: a questo punto il token dev'essere quello di una delle nostre nuove funzio- 
ni, queste linee determinano quale e saltano alla routine appropriata. 


220-310: VARPTR: questa funzione restituisce un puntatore alla locazione in me- 
moria di ogni variabile il‘-cui nome sia posto fra parentesi come argomento. 


220-230: al ritorno dalla routine situata alla locazione AFFI, che valuta la variabi- 
le fra parentesi, l’indirizzo della variabile è contenuto nelle posizioni 47-48 esadeci- 
male (71-72 decimale). Il valore a due byte viene caricato in accumulatore e nel re- 
gistro Y. 


240: questo indirizzo viene ora inviato alla routine che converte questo numero in- 
tero in numero a virgola mobile. Questo è necessario poiché l’interprete si aspetta 
un numero in virgola mobile come risultato di una funzione, e lo tratterà di conse- 
guenza. 


250-300: sfortunatamente, il convertitore in virgola mobile cambierà un numero in- 
tero senza segno in uno a virgola mobile con segno. Ciò significa che i numeri supe- 
riori a 32767 risulteranno negativi, come ad es. avviene per la funzione FRE nel 
BASIC normale. Se immettete FRE (0) quando non c’è un programma in memo- 
ria, verrà restituita una quantità negativa, a cui va aggiunto 65536 per avere il ri- 
sultato corretto. Queste linee controllano se c’è un segno meno memorizzato nel 
byte di segno dell’accumulatore #1 della virgola mobile (alla locazione 66 esadeci- 
male, in pagina zero). Se si trova un meno (cioè se il bit 7 vale uno), si carica in ac- 
cumulatore e nel registro Y l’indirizzo della variabile CONSTANT (linea 480), che 
in realtà è 65536 in virgola mobile. Questo valore viene ora posto nell’accumulato- 
re #2 della virgola mobile con una chiamata alla routine dell’interprete situata in 
BA8C (esadecimale) e sommato al valore in accumulatore #1 della virgola mobile 
da una chiamata alla routine posta in B86A. 
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310: si torna al valutatore di espressioni, che potrebbe essere ancora nella valuta- 
zione di un’espressione di cui VARPTR è solo una parte. 


320-370: YPOS: questa nuova funzione restituisce la posizione verticale del curso- 
re sullo schermo. È parallela alla normale funzione BASIC POS, che restituisce la 
posizione orizzontale del cursore. 


330: la routine del KERNAL che restituisce la posizione del cursore nei registri X 
ed Y. 


340-350: il contenuto del registro X viene memorizzato nel registro Y (il registro X 
conteneva originariamente la posizione verticale). 


360-370: l’accumulatore ed il registro Y contengono ora lo stesso valore. Si carica 
zero in accumulatore, fornendo così, nell’accumulatore e nel registro Y, un numero 
a 16 bit nell’intervallo 0-24 (i numeri delle linee sullo schermo). Questo intero a 16 
bit viene ora inviato alla routine situata a LBL003, che lo converte in numero a vir- 
gola mobile. 


390-470: DEEK: questa funzione restituisce un numero nell’intervallo 0-65535. È 
di fatto una PEEK doppia ed equivale alla frase in BASIC normale: PEEK (X) 
+256xPEEK (X+1). 


390: il parametro valutato dal valutatore di funzioni viene convertito in un intero 
con questa chiamata (PEEK e DEEK si rivolgono ad indirizzi interi). 


400-460: il valore restituito si dovrà trovare nei nostri vecchi amici 14-15 esadeci- 


mali. L’accumulatore ed il registro Y vengono caricati con questo valore e si salta a 
LBL003, restituendo così il contenuto dei due byte al valutatore di espressioni. 


Valutatore di espressioni esteso: listing completamente assemblato 


add, data source code 
[1] 1A PRT 
A 20 SYM 
A 2A ORG £C44A 
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C44A 49 
ALUATOR 


C44A SA 
TH CJMP FUNENL” 
C44A  EGSF 6a 
C44C 9SQ1A ra 
C44E  E998 30 
C45A 9013 920 
C452  E69F 190 
C454  BOOF 119 
C456  20F1AE 120 
C459 68 120 
C4SA AA 140 
C45B EG9S 150 
C4ISD  FA2F 160 
C4S5F EBSA 170 
C461 FOZA 190 
C463 DARE 199 


C465 4CBIAF 200 
C463 4CDIAF 210 


C46B A348 220 
C4EN  A447 230 
C46F 2091E3 240 
C472 AS66 250 
C474 190A 260 
C476 AAC4 270 
C472 A99E 280 
236 


C47A ZO8CBA 299 
C47D 206AE8 200 
C450 4CSDAD 319 


C4GI Sa 320 
0484 20FOFFO 23 
C487? 8A 340 
C488 AQ FIA 
C489 A9DG 360 
C48B 4C6FC4 370 
C4B8E 320 
C49E  <0F7B7 390 
C491 AQAI 409 
C493 B1l14 419 
C495 48 420 
C496 88 439 
C497  B1l14 449 
C499 RAS 459 
C49A 68 460 


C49B 4C6FC4 470 


+ EXTEND EXPRESSION E" 
5 TO USE POKE £AFRA WI 


FUNEYVL CPX #£9F 
BCC LELOAZ 

CPX #$92 

BCC LELAA1 

CP #£9F 

BCS LELOAI1 

ISR £AEF1 

PLA 

TAX 

CPX #£99 

BE DEEK 

CPX #£9A 

BEN YPO0S 

BHE “AEPTE 
LELO@1 IMP #AFBl 
LELAG2 JMP $AFDI 
VARPTR LDA 72 
LI 71 

LBLOBS ISR £B391 
LDA £66 

BPL LBL994 

LI #C0HST/256 
LIA #C0HST-CONST/256% 


JSR £EASC 

JISR $B86A 
LELO94 JMP £ADSD 
YPOS SEC 
JSR_$FFF@ 

TXA 

TAY 

LDA #80 

IMP LBL993 

i PERFORM DEEK 
DEEK JSR $B7F7 
LDY #1 

LDA ($14). 
PHA 

DE 

LDA ($143.Y 
TAY 

PLA 

JMP LBLOB3 
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C49E S10000 4830 CONST PYT 145,0,0.9,0 


C4A3 496 ENI! 
TOTAL ERRORS IN FILE --- 8 
FUHENL C44R 
LELDAI1 C465 
LELOOZ C468 
VARPTR C46B 
LELOG? C46F 
LELAG4 C42A 
YPO0S C493 
DEEK C4ZE 
COHST C49E 
total number of sumbola -——- 9 


VARPTR: note sull’uso 


Se si mette fra parentesi un’espressione invece di una variabile, il risultato è privo 
di significato e non dovrebbe venir usato per cambiamenti in memoria. Oltre a ciò 
la funzione può essere usata come scorciatoia per cambiare singoli caratteri in ar- 
rays di stringhe (evitando problemi di garbage collection e complesse funzioni strin- 
ga) o semplicemente per avere un’idea più precisa di cosa accade nell’area delle va- 
riabili Come esempio dell’uso di VARPTR, immettete A%=10 in modo diretto, 
poi PRINT DEEK (VARPTR(A%)+1). Questo restituirà il valore di A%. 

Nel caso di stringhe, PEEK (VARPTR(A$)) restituirà la lunghezza di A$. 

DEEK(VARPTR(A$)+1) restituisce l’indirizzo inziale di A$ in memoria. 


La sintassi corretta per VARPTR è: 
VARPTR(<nome della variabile >) 
YPOS: note sull’uso 


Questa funzione è parallela a POS nel BASIC normale, compreso il fatto che la 
variabile fra parentesi è ignorata. 

La sintassi corretta per YPOS è: 
YPOS(<argomento fittizio >) 


DEEK: note sull’uso 


Molto simile a PEEK, eccetto che restituisce un valore a due byte. DEEK è par- 
ticolarmente utile per accedere ai valori memorizzati in registri a due byte usati dal 
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sistema, es. DEEK(43) restituisce l’indirizzo di inizio BASIC. 
La sintassi corretta per DEEK è: 
DEEK(<espressione >) 


Uso dell’estensore di funzioni 


Come per le parole chiave del BASIC esteso, questa routine deve essere assem- 
blata sul file macchina che avete creato per includere l’estensore del BASIC e gli al- 
tri comandi. La routine potrebbe stare da sola senza interrompere il funzionamento 
del sistema se fosse caricata in memoria, ma non sareste in grado di creare i token 
per le nuove funzioni. 

Allo scopo di inserire la routine nel valutatore di funzioni esistente, la linea se- 
guente va aggiunta al vostro programma BASIC Extender II: 


224 DATA 173,175,76,174,175,74,175,175,196 


L'effetto di questa linea è di piazzare nel valutatore di funzioni un salto alla no- 
stra routine macchina in modo simile a quanto fatto per la routine di esecuzione di 
parole azioni. 

Una volta fatta la modifica, il valutatore di funzioni può venir caricato, con gli 
altri comandi, dal programma BASIC Extender II. 
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CAPITOLO 11 
NUOVE FRONTIERE 


Quando iniziate a scrivere un libro di questo genere, buttate lì tutte le idee per 
routine che vorreste includere. Alcune si dimostrano eccessivamente estese quanto 
alla codifica, altre sembrano di scarso rilievo ad un’attenta considerazione. Alcune 
però si impongono come idee utili che non dovrebbero presentare troppe difficoltà 
nella loro realizzazione. Un’idea di questo genere che ci è venuta — lo ammettiamo: 
a notte fonda — è FAST, una routine che fa tesoro di RKILL rimuovendo i con- 
trolli che l'interprete fa per cercare gli spazi durante l’esecuzione di un programma. 
Il 64 fu acceso, la routine immessa ed assemblata, aggiungendo due nuove parole 


FAST e SLOW (la seconda si limita a ripristinare lo stato normale delle cose). La 
routine venne in questo modo: 


FAST e SLOW: listing in linguaggio assemblatore 


1A PRT 
2A SY 
17) ORG $C057 
40 WRD FAST-1.SLOV-1 
45 ORG $C4A3 
lo) SLOW LDY #0 
(17) PBYT $2C 
70 FAST LDY #4 
sa LDX #0 
20 LEL999 LDA £E3AF.+ 
160 STA £830.4 
119 INA 
120 IN 
13 CPY #£B 
149 BCC LBLODA 
150 RTS 
160 END 
END 
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Fu caricato il BASIC Extender e FAST venne messa in memoria. 

La memoria venne pulita e fu immesso un piccolo programma che eseguiva un 
grosso ciclo, impiegando in totale circa 57,75 secondi. Fu eseguita RKILL sul pro- 
gramma, rimuovendo tutti gli spazi poi fu dato FAST in modo diretto. Dal 64 nem- 
meno un sospiro, la routine stava ovviamente per funzionare fin dalla prima volta 
— un trionfo della pianificazione e progettazione accurata dei programmi. Il ciclo 
venne fatto eseguire ancora, con un cronometro nelle mani tremanti. 

Il risultato fu un tempo di 57,25 secondi, un miglioramento dello 0,89%! 


Non tutto ciò che si può fare in codice macchina vale la pena farlo, né tutto ciò 
che vale la pena fare è possibile. Al termine di questo libro ci è rimasta la sensazio- 
ne che ciò che abbiamo creato valesse la pena crearlo e che altre persone saranno 
in grado di farlo e di imparare da esso. Introducendo il programma Mastercode e le 
routine per le parole chiave (e comprendendoli) avrete compiuto, speriamo, un con- 
siderevole passo avanti nella comprensione del vostro 64 e del potenziale che offre 
per la programmazione in linguaggio macchina. Possano i vostri sforzi avere mag- 
gior successo di FAST. 
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APPENDICE A 


GENERATORE DELLE SOMME 


DI CONTROLLO 


Il programma che segue è quello usato per generare le tavole di controllo fornite 
insieme a ciascun modulo del programma Mastercode. La cifra di controllo per o- 
gni linea è un metodo quasi a prova d’errore di indicazione della correttezza di una 
linea. Il programma lavora sommando i valori di tutti i byte della linea, tornando a 
zero ogni volta che si raggiunge 255. Un carattere scorretto o omesso provocherà 
un cambiamento nella somma. Per far uso delle somme di controllo, immettete que- 
sto programma nel 64 prima di iniziare il programma Mastercode e poi date RUN 
63800 ogni volta che vorrete controllare un gruppo di linee che avete immesso, 
quindi confrontate il risultato con la tavola di controllo del modulo. Se c’è qualche 
differenza, la linea che avete immesso è diversa da quella del libro. Notate che gli 
spazi contano nel calcolo delle somme. 


63000 
63801 
63902 
633993 
623904 
63810 
+15 

63920 
63521 
63822 


REM CHECKSLUM PROGRAM 
GOSUB 63519 
GOSUB 63540 
IF FL>=9 THEN 63902 


ENTI 
DEFFN DEEKX) = PEEK(X3+256#PEEKCK 
REM DATA FOR MACHINE CODE 


DATA ##% 
DATA 165,252, 166,253, 133,020. 134,6 


21,932.919 


63823 


DATA 166,216, 160, 001,177,095.123,2 


54, 249.013 


63924 


DATA 200,177,095,133,252.200.177,0 


95, 133,253 


63925 


DATA, 200, 169, 00, 133, 251,177,0995.2 


49, 906. 624 
623826 DATA 191.251,200,203,244,A96 


63827 DATA -1 
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© REM PUT DATA INTO MEMOFN 
1 ADS= 52992 
2 RESTORE 

533 READ T$: IF T$<C>"###" THEH 63933 

234 READ TT: IF T>=0 THEN POKE AD.T 

D = ADH1 ©: GOTO 6353 

03995 DEV = 30: IN$ = "" ‘ INPUT "OUTPUT 
DEVICE NUMBER "; DEV 

622396 IF DEY=1 OR DEV>4 THEN INPUT "FILE 
NAME ";IM$ 

638937 R$ = CHR$ €13): 5$ = "KK%%4%444% 

EHEHEHANATAAA ARA TATAANA AAA A +RE 

63238 RETURN 

62940 REM DO INITIALISATION 

63841 FL = 9 : INPUT "FIRST LIME "; FL: 
IF FL“9 THEN RETURN 

63842 LL = 65536 ‘: INPUT "LAST LIME "; L 

L 

63343 INPUT "MODULE NAME ";M$ 

63844 IF DEV=1 OR DEV?4 THEN OPEN 1.DE, 

2, INS | GOTO 63846 

63845 OPEN 1,.DE 

62846 PRINT#1,5% R$SPCCC40-LENCM$))/2)M$ 

P$ R£"LINE NUMBERS"FL"TO"LL:!RES$R$ 

25537 REM ACTUAL PROGRAM 

63851 LN = FL: Cs: C1=4@ 

6325 i2 POKE 252.LN-INT(LH/256)#256 : POKE 
243 LN/ZIE 

63853 S7S 352992 : CS = PEEKC251) : LN = 

FHDEEK€2521+1 

63860 REM FORMAT OUTPUT INTO 3 COLUMNS 

63861 T$ = LEFT$ CSTRECLN-13+" ",6) 

+LEFT$ «STR$CC53+" ",7) 

63962 PRINTR1.T$; 

63964 C = C+1 : IF Cè3=3 THEN PRINT#1I : C 

+: CI=CL1 +1 


63965 IF C12=20 AND DEV=3 THEH C1=0: 
GOSLB 62998 

63966 IF LN“=LL AND PEEKC254% THEN 63852 
63267 FRINT#1.F# © CLOSE 1: RETURN 
63099 GET T$ |! IF T$="" THEN 63998 
62299 RETURN 


186 


TAVOLA DI CONTROLLO 


GISMO SE GISSL 175 z 
GSS0l 156 GIS 125 Ei 
63920 I GISSi d3 asl 
GISZzI SE GIo24 de GIO 
6ISZ6 14 GSS 1 Detti) 
623931 130 GISd2 140 CISTI 
63934 35 GIsdi 214 63936 
63937 145 GISIS 142 CATIA 
62241 2 62542 133 63942 
63844 119 63845 251 CIO 
63950 161 GIF51 13 CISSE 
63853 255 63560119 GISel 
63862 168 E3864 79 Gase 
63866 206 GIBE7 222 63998 


63299 142 


' 
"4 


Di 


vir for: 
Una 


- 
ca! 


soin bam 


LI EER An RE CIO RT RI rt) 


repo riaiale 


APPENDICE B 


MASTERCODE: GUIDA 
DELL’UTENTE 


Il programma Mastercode si divide in quattro sezioni: Monitor, Disassembler, 
File Editor ed Assembler, tutte perfettamente compatibili fra loro. Al momento del- 
l’inizio dell'esecuzione di Mastercode, ci sarà una notevole attesa mentre vengono 
generate le complesse tabelle per il Disassembler e l’ Assembler. La prima sezione 
del programma disponibile per l’utente è il Monitor - Assembler, Disassembler e Fi- 
le Editor sono tutti richiamati dal Monitor come opzioni del menu. 


Monitor 


L’uso del Monitor è semplicissimo. Basta seguire le indicazioni date quando il 
programma viene fatto eseguire. Disassembler e Assembler tornano entrambi al 
Monitor una volta terminati i loro compiti correnti. Il Monitor è l’opzione 0 duran- 
te l’uso del File Editor. 


Disassembler 


Il Disassembler è in grado di fornire traduzioni in linguaggio assemblatore di tut- 
te le istruzioni macchina del 6502/6510 nel formato standard stabilito dalla Moste- 
chnology (ora parte della Commodore Semiconductor Group), progettista del chip. 

Per usare il Disassembler è necessario solo specificare, in esadecimale, l’indiriz- 
zo d’inizio dell’area di memoria da disassemblare. È necessaria una certa attenzio- 
ne nella scelta del punto d’inizio corretto, dal momento che un indirizzo iniziale 
non coincidente con il primo byte di un’istruzione macchina risulterà in uno o più 
‘72? o istruzioni tradotte erroneamente prima che il disassembler si sincronizzi con 
la memoria. La ricorrenza di ‘???’ nel mezzo di un’area disassemblata di memoria 
indica la presenza di tabelle di dati. Le istruzioni disassemblate circondate da indi- 
catori ‘???” vanno prese con cautela, poiché possono rappresentare byte casuali 
che somigliano a vere istruzioni macchina. Al termine di tabelle di dati si possono 
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verificare altri disguidi, per la stessa ragione del caso in cui si sia specificato un 
punto di partenza non valido. Quando si disassemblano zone successive a tabelle, è 
bene tentare di identificare la fine della tabella iniziando con l’indirizzo dell’ultimo 
‘???° e facendo diversi disassemblaggi, oguno che inizi dal byte successivo, fino a 
trovare un punto di partenza che generi linguaggio assemblatore sensato fin dal 
principio. 


File Editor 


Il file editor è semplicemente un mezzo di immettere una serie di linee numerate 
— non si fanno controlli se si immettano istruzioni valide del linguaggio assembla- 
tore. Si possono inserire linee all’interno di file esistenti dando loro numeri appro- 
priati. Si possono listare e cancellare blocchi di linee. 

Si possono cancellare linee singole durante l’immissione battendo il numero di li- 
nea senza testo seguente (come in BASIC). 

Si possono salvare file non assemblati per un successivo caricamento. Si posso- 
no fondere file da memoria esterna con file già presenti in memoria centrale, se la 
lunghezza totale risultante non è superiore a 255 linee — ogni linea può contenere 
solo una istruzione in linguaggio assemblatore. Si possono numerare le linee di un 
file da fondere con un altro già in memoria in modo che cadano all’interno del testo 
presente, all’inizio o alla fine o anche rimpiazzino linee già esistenti. La possibilità 
di ‘change device’ (cambio di dispositivo) permette di alterare il numero del disposi- 
tivo corrente di 1/O, permettendo così di salvare file sul dispositivo 4 (stampante) o 
di fare copie di sicurezza su nastro per coloro che lavorano su disco. Non c’è con- 
trollo che il dispositivo di 1/O corrente sia connesso o sia in grado di salvare o cari- 
care. Possono essere aggiunti a un file dati in codice macchina dalla memoria, ma 
essi avranno la forma di byte e non di linguaggio assemblatore. 


Assembler 


L’assembler accetta tutti i codici mnemonici standard nel formato standard, con 
l’eccezione che le virgole vanno sostituite da punti. I principali, comandi disponibili 
per l’assembler sono: 


1 — assemblaggio in memoria: il file immesso per mezzo del file editor viene tradot- 
to in codice macchina e piazzato in memoria. Si possono unire programmi a pro- 
grammi già assemblati caricando programmi in linguaggio macchina in memoria 
(col file editor) ed iniziando poi l'assemblaggio del secondo programma al byte suc- 
cessivo al termine del primo, superando così ogni problema derivante dalla limita- 
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zione di un file a 255 linee. Notate che variabili ed etichette del primo programma 
vanno ridichiarate per il secondo. 


2 — assemblaggio senza introduzione in memoria: il file viene assemblato con una 
lista completa degli indirizzi e del loro contenuto, ma la memoria resta inalterata. 


3 — listing dei soli errori: vengono stampate le sole istruzioni contenenti errori, con 
un’indicazione del tipo di errore. 


4 — listing completo: si stampa il listing completo comprese le indicazioni di errore. 
Notate che se ci sono due errori sulla stessa linea, solo uno verrà indicato. Assem- 
blaggi successivi segnaleranno gli errori rimanenti una volta corretto il primo grup- 
po. 


L’assembler fornisce sette ‘direttive’ che non compaiono nel programma in lin- 
guaggio macchina, ma modificano il modo di assemblare: 


1 — ORG indirizzo: Questa direttiva indica che l’istruzione successiva in linguag- 
gio assemblatore dev’essere assemblata all’indirizzo specificato — le istruzioni se- 
guenti proseguiranno da quell’indirizzo. Un singolo programma in linguaggio as- 
semblatore può contenere parecchie direttive ORG indicanti sezioni di programma 
da piazzare in aree di memoria completamente diverse. 


2 — PRI: Seguendo questa direttiva, l’output del programma assemblato passa 
dallo schermo alla stampante. 


3 — SYM: Indica che la tavola simboli, che contiene i valori delle variabili e delle e- 
tichette, dev’essere seguente il listing. 


4 — END: Questa direttiva termina l'assemblaggio — non deve essere per forza al 
termina di un programma. Quando è usata come ultima linea di un programma, il 
suo indirizzo segnala il primo byte di memoria libero che segue il programma as- 
semblato. 


5 — BYT: Permette di specificare su una sola linea una serie di valori da un byte, 
separati da punti. I valori verranno immessi direttamente in memoria. 


6 — DBY: Simile a BYT, eccetto che il valore specificato può essere nell’intervallo 
dei due byte (0-65535). I due byte verranno posti in memoria col byte alto per pri- 
mo. WRD è identica a DBY eccetto che viene messo per primo il byte basso. Nota- 
te che i programmi assemblati possono essere salvati come file di codice macchina 
via Monitor, una volta posti in memoria. 
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APPENDICE C 
MASTERCODE: 


TABELLA DELLE VARIABILI 


Indirizzo corrente in memoria; 

(Assemblaggio in memoria) flag usato nell’assembler; 

Base numerica corrente per le conversioni; 

COntinua nel monitor / COmando nel file editor; 

Indica il dispositivo per caricamento/salvataggio; 

Usata nel file editor per registrare le linee vuote; 

(End Address=indirizzo finale) usata nel monitor; 

(Error Count=contatore di errori) nell’assemblaggio; 

(Error Number=numero dell’errore) usata nell’assemblaggio per indi- 
care il tipo di errore; 

(Error Only listing=listing dei soli errori) flag usato nell’assembler; 
Usata per segnalare condizioni di errore; 

Messaggi di errore per l’assembler; 

Le si assegna un valore se l’assembler incontra la direttiva END; 
Valore logico (=0); 

Matrice del file principale nel file editor; 

Linea cui terminare il listing o da cancellare nel file editor; 
Numero di righe in FI$; 

Converte cifre decimali in esadecimali ASCII; 

Converte cifre esadecimali in decimali; 

(Finish Pointer= puntatore al termine) usata da list e delete nel file edi- 
tor; 

Usata in routine di conversione — H$ convertita in decimale; 
Stringa generica di ingresso e uscita per numeri esadecimali; 
Variabile generica usata per l’input; 

(Line Number=numero di linea) usata nel file editor; 

Puntatore usato nell’esame delle istruzioni in linguaggio assemblatore; 
Contiene l’ordine degli elementi di FI$; 

Tipo dell’operando: assembler e disassembler; 
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O$ Stringa generica di uscita; 


01$ Stringa generica usata durante la visualizzazione su schermo del con- 
tenuto della memoria; 

02$ Come la precedente, usata anche nel disassembler; 

03$ Come 01$; | 

PASS Passo corrente dell’assemblaggio in due passi; 

PO Puntatore al tipo di codice mnemonico; 

Q Variabile di ciclo usata nell’assembler; 

QI Indirizzo iniziale della linea che viene assemblata; 

Q3I Variabile di ciclo usata nell’assembler; 

Q1$ Variabile temporanea usata nel formato d’uscita dell’assembler; 

RESULT Uscita del valutatore di espressioni; 

SA (Start Address=indirizzo iniziale) usata da parecchie routine; 

SE Numero corrente di simboli durante l’assemblaggio; 

SL (Start Line=linea iniziale) usata in list e delete nel file; editor; 

SM Massimo numero di simboli nella tavola simboli; 

SP Puntatore iniziale per list e delete nel file editor; 

ST Variabile di sistema in BASIC; 

ST$ (Symbol Table=tavola simboli) usata in assembler; 

SY Usata per indicare il trasferimento della tavola simboli in assembler 

T, TA, TB, TO, T1, T2, ecc. Variabili numeriche temporanee usate in diversi mo- 
duli; 

T$ Variabile stringa temporanea usata in diversi moduli; 

TA$ Tabelle di decodifica per assembler/disassembler; 

T1$ Variabile temporanea usata in diversi moduli; 

TERM Risultato temporaneo nel valutatore di espressioni; 

TRUE Valore logico (=—1); 

XI Variabile di ciclo usata nel caricatore esadecimale; 

XY Variabile di ciclo usata nel file editor; 

XZ Come sopra. 
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APPENDICE D 


TABELLA DELLE SUBROUTINE 
DEL PROGRAMMA 
MASTERCODE 


10000 Inizializzazione generale; 

10100 Routine di controllo del monitor; 
11000 Conversione decimale - esadecimale; 
11100 Acquisizione di un byte dalla memoria; 


11200 Ingresso dell’indirizzo finale; 
11250 Ingresso del nome del file; 


11850 Richiesta di continuazione; 

11950 Conversione esadecimale - decimale; 

12050 Ingresso dell’indirizzo iniziale; 

12200 Caricamento di caratteri esadecimali in stringhe; 


13000 Acquisizione di 1 byte dall’utente; 
13100 Modifica della memoria; 


13300 Trasferimento da memoria a schermo; 
13500 Esecuzione del codice macchina; 
14100 Salvataggio del codice macchina; 
14300 Caricamento del codice macchina; 
15300 Formato dell’operando; 

15450 Formato dell’operando per l’indirizzamento in accumulatore; 
15550 Formato dell’operando per l’indirizzamento implicito; 
15550 Formato dell’operando per l’indirizzamento immediato; 
15600 Formato dell’operando per l’indirizzamento relativo; 
15700 Disassemblaggio di un’istruzione; 

15800 Disassemblaggio di un’area di memoria; 
19000 Inizializzazione tabelle di decodifica; 
20000 Routine di controllo dell’assembler; 
23020 Ricerca del numero di linea nel file; 


23100 Aggiunta di una linea al file; 
23300 Cancellazione di una linea dal file; 
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23400 
23500 
23600 
23700 
23900 
24000 
24200 
24300 
24400 
24500 
24600 
24700 
24800 
25000 
25500 
26000 
26100 
26300 
26400 
26500 
26600 
26900 
27000 
27200 
27400 
27500 
27600 
28000 
28100 
28150 
28250 
28300 
28500 
28600 
28700 
28850 
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Listing di una linea del file; 

Acquisizione dei puntatori di inizio e fine; 
Caricamento di un file da un dispositivo; 
Salvataggio di un file su un dispositivo; 
Rimozione degli spazi iniziali; 

Acquisizione del numero di linea dall’input della linea; 
Ingresso delle linee iniziale e finale; 
Inizializzazione del file; 

Listing delle linee; 

Cancellazione delle linee; 

Ingresso delle linee; 

Rinumerazione del file; 

Routine di controllo del file editor; 
Aggiunte da memoria al file; 

Cambiamento del numero di dispositivo; 
Ricerca di un simbolo fino ai due punti; 
Determinazione del tipo di operando usato; 
Valutazione del codice operativo; 

Routine di controllo del passo 1; 
Acquisizione della lunghezza dell’istruzione macchina; 
Calcolo della lunghezza della direttiva; 
Trasferimento della tavola simboli; 
Valutazione dell’operando; 

Valutazione della direttiva; 

Valutazione dell’operando immediato; 
Valutazione dell’operando relativo; 

Routine di controllo del passo 2; 

Routine assembler per gli errori; 

Stampa di IN$; 

Ricerca di un simbolo fino a non-cifra/non-lettera; 
Ricerca di un’etichetta in tavola simboli; 
Valutazione di un’etichetta o di un numero; 
Valutazione di un termine; 

Valutazione di un’espressione; 

Aggiunta di un simbolo alla tavola simboli; 
Test per i codici operativi mnemonici. 


A38A 
A4T7A 
A4A4 
AS33 
A613 


A65E 
A71F7 


A831 
A8E0 
A8E3 
AD8A 


AEFI 
AEFD 


AEFF 
B248 
B7F7 


B391 


B828 
B86A 


APPENDICE E 


TABELLA DELLE ROUTINE 


ROM RICHIAMATE 


Ricava il primo indirizzo di ritorno sulla pila; 

Stampa ‘READY’ e torna in modo diretto; 

Inserisce una linea nel file BASIC; 

Ricollega il file BASIC; 

Converte il numero di linea contenuto in 14-15 esadecimali nell’indiriz- 
zo d’inizio linea in 5F-60 esadec.; 

Esegue CLR; 

Converte il valore contenuto nell’accumulatore a virgola mobile #1 in 
un intero senza segno; 

Esegue END; 

Stampa ‘RETURN WITHOUT GOSUB'’ e torna in modo diretto; 
Stampa ‘UNDEFINED STATEMENT” e torna in modo diretto; 
Acquisisce un numero in virgola mobile dal programma BASIC e lo 
pone nell’accumulatore v.m. #1; 

Valuta un’espressione fra parentesi; 

Controlla che il carattere seguente nel programma BASIC sia una vir- 
gola, altrimenti stampa ‘SYNTAX ERROR’; 

Controlla che il carattere seguente nel programma BASIC sia uguale 
al contenuto dell’accumulatore, altrimenti stampa ‘SYNTAX ER- 
ROR’; 

Stampa ‘ILLEGAL QUANTITY?” e torna al modo diretto; 
Converte l’accumulatore a virgola mobile #1 in un intero senza segno; 
Converte un intero senza segno contenuto in 14-15 in un numero in 
virgola mobile contenuto nell’accumulatore v.m. #1; 

Fine della routine POKE; 

Somma i numeri in virgola mobile degli accumulatori v.m. #1 e #2. Il 
risultato va nell’accumulatore #1.; 
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BA8C 


E15F 
El175 

E1D4 
FFFO 
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Copia il numero in virgola mobile indicato dall’accumulatore (byte 
basso) e dal registro Y (byte alto) nell’accumulatore v.m. #2; 
Esegue un salvataggio da memoria su dispositivo; 

Esegue caricamento o verifica da dispositivo; 

Acquisisce i parametri per load e save dal programma BASIC; 
Routine KERNAL che assegna o ricava la posizione del cursore. 


APPENDICE F 


TABELLA DEI CARATTERI 
DI CONTROLLO 


COME RAPPRESENTATI NEL PROGRAMMA MASTERCODE 


[CDW] — Cursore giù 

[CUP] — Cursore su 

[CLH] — Pulizia dello schermo 
[GRN] — Control +6 

[BLU] — Control +7 

[RON] — Reverse On 

[ROF] — Reverse Off 
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Il libro apre nuovi orizzonti a tutti coloro che sono 
interessati alla programmazione in linguaggio macchina del 
Commodore 64. 

La prima parte fornisce il listato completo e commentato 
del programma Mastercode, un potente assemblatore 
scritto in BASIC. 

La seconda parte presenta una collezione di routine in 
codice macchina, che arricchiscono il BASIC standard 
della macchina con quattordici nuovi programmi. 

Le descrizioni, ampie e precise, delle diverse routine 
costituiscono un’introduzione alle più importanti tecniche 
di programmazione in linguaggio macchina, danno preziosi 
suggerimenti per il miglior utilizzo della ROM del 
calcolatore. 
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